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IDENTIFICATION 


PRODUCT CODE: AC -T798-MC 
PRODUCT NAME: CZDHWAO DHU-11 FUNC TST PARTS 
PRODUCT DATE: 15 DEC 1983 


MAINTAINER: ENE - DIAGNOSTICS GROUP 
AUTHOR ; ANTHONY HART 
MODIFIED BY: 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 


NO RESPONSIBILITY IS ASSUMED FOR THE USE OR RELIABILITY OF 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS 
AFFILIATED COMPANIES. 


COPYRIGHT (C) 1983,19864 BY DIGITAL EQUIPMENT CORPORATION 
THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION: 


DIGITAL POP UNIBUS MASSBUS 
DEC DECUS DECTAPE 
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1.0 GENERAL PROGRAM CONSIDERATIONS 
1.1 PROGRAM ABSTRACT 

CZDHWAO IS PART OF THE DHU-11 FUNCTIONAL VERIFICATION TEST. 
THIS PART OF THE TEST PERFORMS EXTENSIVE DATA TRANSMISSION AND 


RECEPTION TESTS. THIS PART ALSO INCLUDES A KEYBOARD ECHO AND 
MODEM LOOPBACK TEST. 


THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC 
RUNTIME SERVICES SOFTWARE (SUPERVISOR). THESE SERVICES PROVIDE 


AN USED WITH 
TAPE. FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES, REFER 
TO THE XXDP+ USER'S MANUAL. THERE IS A BRIEF DESCRIPTION OF 
ie nee bot — IN THE OPERATING INSTRUCTIONS -COMMANDS 


1.2 SYSTEM REQUIREMENTS 
THE FOLLOWING HARDWARE IS REQUIRED TO RUN THE DHU FYT: 


O UNIBUS PROCESSOR WITH AT LEAST 32k BYTES OF MEMORY. 
O OHU BOARDS INSTALLED ON THE UNIBUS. 


APPROPRIATE PROGRAM LOAD DEVICE SUPPORTING XXDP>+ 
MEDIA OR A DOWN LINE LOADING SYSTEM. 


1.3 RELATED DOCUMENTS AND STANDAROS 


O XXDP+ USER'S MANUAL - DESCRIBES THE RUNNING OF DIAGNOSTICS 
UNDER THE XXDP+ MONITOR. 


oe 


OHU-11 FUNCTIONAL VERIFICATION MACRO M1200 12-DEC-83 16:16 PAGE 6 SEQ 5 
PROGRAM DOCUMENT 

1.4 OIAGNOSTIC HIERARCY PREREQUISITES 

THE PROCESSOR, THE UNIBUS, THE SYSTEM MEMORY, THE CONSOLE TERMINAL 


ANDO THE LOAD MEDIA ARE ASSUMED TO HAVE BEEN TESTED AND FOUND WORKING 
BEFORE THIS PROGRAM IS RUN. 


1.5 ASSUMPTIONS 


OR aN Ts senermetnraes = TORE 5 
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2.0 OPERATING INSTRUCTIONS 


THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES. 
FOR DETAILED INFORMATION, REFER TO THE XXDP+ USER'S MANUAL (CHQUS). 


2.1 COMMANDS 


THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC oheat hk SERVICES 
(SUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP+ USER'S MANUAL HAS MORE DETAILS. 


COMMAND EFFECT 

START START THE DIAGNOSTIC FROM AN INITIAL STATE 
RESTART START THE DIAGNOSTIC WITHOUT INITIALIZING 
CONTINUE CONTINUE AT TEST THAT WAS INTERRUPTED CAFTER tC) 
PROCEED CONTINUE FROM AN ERROR HALT 

= RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!) 


ACTIVATE A UNIT FOR TESTING CALL UNITS ARE 
CONSIDERED TO BE ACTIVE AT START TIME 
DEACTIVATE A UNIT 


OROP 

PRINT PRINT STATISTICAL INFORMATION CIF IMPLEMENTED 
BY THE DIAGNOSTIC - SEE PERF AND PROGRESS 
REPORTS SECTION OF THIS DOCUMENT) 

DISPLAY TYPE A LIST OF ALL DEVICE INFORMATION 

FLAGS TYPE THE STATE OF ALL FLAGS (SEE FLAGS SECTION) 

ZFLAGS CLEAR ALL FLAGS (SEE FLAGS SECTION) 


A COMMAND CAN BE RECOGNIZED BY THE FIRST THREE ee so 
YOU MAY, FOR EXAMPLE, TYPE “STA” INSTEAD OF “STAR 

MORE INFORMATION CAN = FOUND WITHIN THE SECTION LABELLED 
EXTENDED COMMAND SYNTAX 


2.2 SWITCHES 


THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION. 


THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS. ALL OF THE LEGAL 
agg ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH. 
THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY “DODDD”’. 


/TESTS:LIST EXECUTE ONLY THOSE TESTS a hs IN 
THE LIST. LIST IS A STRING OF TEST 
NUMBERS, FOR EXAMPLE - /TESTS: 435,17 10. 
THIS LIST WILL CAUSE TESTS 1,5.7,8,9.16 TO 


SEQ 6 
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Hi 


BE RUN. ALL OTHER TESTS WILL NOT BE RUN. 
/PASS :D0000 EXECUTE DDDDD PASSES CODDDD = 1 TO 64000) 
/FLAGS:FLGS SET SPECIFIED FLAGS.SEE THE FLAGS SECTION 
OF THIS DOCUMENT. 
7EOP :DDD00 REPORT ENO OF PASS MESSAGE AFTER EVERY 
DDDDD PASSES ONLY. (DDDDD = 1 TO 64000) 
/UNITS:LIST TEST/ADD/OROP ONLY THOSE UNITS SPECIFIED 
IN THE LIST. LIST EXAMPLE - /UNITS:0:5:10-12 
USE UNITS 0,5,10,11,12 CUNIT NUMBERS = 0-63) 


EXAMPLE OF SWITCH USAGE: 

START/TESTS: 1-S/PASS: 1000/E0OP: 100 
THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 THROUGH 5 WILL BE 
EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3) THE END OF 
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY. A 
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. YOU MAY, 
FOR EXAMPLE, TYPE “/TES:1-5" INSTEAD OF “/TESTS:1-5". 


— IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH 


TESTS PASS FLAGS EOP UNITS 


Ii 
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2.3 FLAGS 


FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS 

ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH. THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR 

ALL FLAGS. WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS, 
NO COMMANDS AFFECT THE STATE OF THE FLAGS; THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 


FLAG EFFECT 

HOE HALT ON ERROR - CONTROL IS RETURNED TO 
RUNTIME SERVICES COMMAND MODE 

LOE LOOP ON ERROR 

IER« INHIBIT ALL ERROR REPORTS 

IBRe INHIBIT ALL ERROR REPORTS EXCEPT 
FIRST LEVEL (FIRST LEVEL CONTAINS 
ERROR TYPE, NUMBER, PC, TEST AND UNIT) 

IxRe INHIBIT EXTENDED ERROR REPORTS (THOSE 
CALLED BY PRINTX MACRO'S) 

PRI DIRECT MESSAGES TO LINE PRINTER 

PNT PRINT TEST NUMBER AS TEST EXECUTES 

BOE “BELL” ON ERROR 

UAM UNATTENDED MODE (NO MANUAL INTERVENTION) 

ISR INHIBIT STATISTICAL REPORTS (DOES NOT 


APPLY TO DIAGNOSTICS WHICH DO NOT SUPPORT 
STATISTICAL REPORTING) 


IOR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTOOROP CODE 

LOT LOOP ON TEST 

EVL EXECUTE EVALUATION CON ations WHICH 
HAVE EVALUATION SUPPORT) 


*SEE THE ERROR INFORMATION SECTION OF THIS DOCUMENT. 


SEE THE XXDP+ USEP’S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAY 
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWITCH. FOR EXAMPLE, 
AND TYPE A “BELL” ON ERROR, YOU MAY USE THE FOLLOWING STRING: 


/FLAGS :LOE : IER: BOE 


Se ee Ao AS 


J | 
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2.4 EXTENDED COMMAND SYNTAX 


} 
| 
2.4.1 START COMMAND - | 
SEAAAAAAAAAAHSAAAERAKEAAAAEAAEKAAEARERAAEAASCAAAEAESEEAAEEAKAE 
STACRT )/ TESTS: < TEST-LIST>/PASS: <PASS-CNT>/FLAGS: 

<FLAG-LIST>/EOP: <INCR> 
SEAAAAAAEASARASALARAAAARAAAREAAAASEEESAEKARAASAAEALEASEERAEEESE 


2.4.1.1 TESTS SWITCH (/TESTS:<TEST-LIST>) - 


<TEST-LIST> IS A SEQUENCE OF DECIMAL NUMBERS (1:2 ETC.) OR RANGES 
OF DECIMAL NUMBERS (1-5:86-10 ETC.), SEPERATED BY COLONS, THAT SPECIFY 
THE TESTS TO BE EXECUTED.TESTS WILL BE EXECUTED IN NUMERICAL ORDER 
REGARDLESS OF THE ORDER OF SPECIFICATION. THE DEFAULT IS TO EXECUTE 
ALL TESTS. ON THIS AND ALL SWITCHES, THE ANGLE BRACKETS <> ARE 
PUNCTUATION USED IN THE DEFINITION ONLY, AND ARE NOT TO TYPED BY 
i Ms ata SEE EXAMPLE AT END OF “EFFECT OF START COMMAND” 


2.4.1.2 PASS SWITCH (/PASS:<PASS-CNT>) - 


<PASS-CNT> IS A DECIMAL NUMBER INDICATING THE DESIRED NUMBER OF 
PASSES. A_PASS IS ODEFINED AS THE EXECUTION OF THE FULL DIAGNOSTIC 
CALL SELECTED TESTS).THE DEFAULT IS NON-ENDING EXECUTION. IN _ THIS 
CASE, EXIT FROM THE yo,rO IS ACCOMPLISHED EITHER BY TYPING A 
CONTROL/C OR BY OCCURANCE OF AN ERROR WITH THE HALT ON ERROR FLAG 
BEING SET. THE EXIT IS A RETURN TO COMMAND MODE. SEE EXAMPLE AT END 
OF “EFFECT OF START COMMAND” SECTION. 


2.4.1.3 FLAGS SWITCH (/FLAGS:<FLAG-LIST>) - 


<FLAG-LIST> IS A SEQUENCE OF ELEMENTS OF THE FORM <FLAG>, 
<FLAG=1>, OR <FLAG=0>, SEPARATED BY COLONS, WHERE <FLAG> HAS ONE OF 
THE FOLLOWING VALUES: 


HOE HALT ON ERROR, CAUSING COMMAND MODE TO 
BE ENTERED WHEN AN ERROR IS ENCOUNTERED. 
LOE LOOP ON ERROR, CAUSING THE DIAGNOSTIC TO 
LOOP CONTINUOUSLY WITHIN THE SMALLEST 
OEF OF CODING (SEGMENT, SUBTEST, 
THE ERROR. 


IER . 

4 INHIBIT BASIC ERROR REPORTS. 

PRI os ALL MESSAGES TO A LINE PRINTER. 

PNT T NUMBER OF TEST BEING EXE 

BOE ON ERROR (NOT RELATED TO BELL PROMPTING). 
UAM MODE, BYPASS 


RUN _IN UNATTENDED ING MANUAL 
INTERVENTION (ILLEGAL FOR THIS DIAGNOSTIC). 
ISR INHIBIT STATISTICAL REPORTS. 





Kd 
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IOU INHIBIT DROPPING OF UNITS BY DIAGNOSTIC. 
CHAS NO EFFECT IN THIS DIAGNOSTIC. ) 
LOT LOOP ON TEST 
THE FLAGS NAMED OR EQUATED TO 1 ARE SET, THOSE EQUATED TO 0 ARE 
CLEARED. A FLAG NOT SPECIFIED IS CLEARED. IF THE FLAGS SWITCH IS NOT 
GIVEN ALL FLAGS ARE CLEARED. SEE EXAMPLE AT END OF "EFFECT OF START 
COMMAND” SECTION. 


2.4.1.4 END OF PASS SWITCH (/EOP:<INCR>) - 


<INCR> IS A DECIMAL NUMBER INDICATING HOW OFTEN (CIN TERMS OF 
PASSES) IT IS DESIRED THAT THE END OF PASS MESSAGE BE PRINTED. THE 
DEFAULT IS AT THE END OF EVERY PASS. SEE EXAMPLE AT END OF “EFFECT OF 
START COMMAND” SECTION. 


2.4.1.5 EFFECT OF START COMMAND - 


THE EFFECT OF THE START COMMAND IS bs A Rt ae THE HARDWARE 
PARAMETER TAL T SOF T’ AMETER OIALOGUE, THE 


OIALOGUE, HE WARE 
INITIALIZATION QUESTIONS, AND THEN THE DIAGNOSTIC COMMENCES TESTING. 


THE HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION “@ 
UNITS (0) ?” TO WHICH THE OPERATOR SHOULD REPLY WITH THE NUMBER OF 
UNITS TO BE TESTED. FOLLOWING THIS ARE THE QUESTIONS WHEREBY T 


BINARY, O FOR OCTAL, L FOR YES/NO) IN PARENTHESES AND THE DEFAULT 
VALUE " AFTER THE PARENTHESES. FOR ACTUAL HARDWARE P-TABLE 
QUESTIONS SEE THE “HARDWARE PARAMETERS” SCETION. 


FOLLOWING THE HARDWARE QUESTIONS ARE THE SOFTWARE QUESTIONS TO 
BUILD THE SOFTWARE TABLES, WHICH DEFINE OPERATING PARAMETERS OF THE 
DIAGNOSTIC PROGRAM. THESE QUESTIONS ARE DESCRIBED IN THE “SOFTWARE 
PARAMETERS” SECTION. 

EXAMPLE : 
STA/TESTS:1:3-4: /PASS:3/FLAGS: IER: HOE*1 

THIS COMMAND WILL CAUSE THREE PASSES TO BE MADE, WITH EACH PASS 
CONSISTING OF TESTS 1,3, AND 4. THERE IS NO DIFFERENCE BETWEEN SAYING 
<FLAG> AND SAYING <FLAG@1>. THE NOTATION <FLAG=*O> IS MEANINGFUL ONLY 


NOTE THAT ON ALL COMMANDS ONLY THE FIRST THREE LETTERS ARE SCANNED. 
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2.4.2 RESTART COMMAND - 
SRAARERERAREEEREEEEEEEESERAREEEREEREAAERERREEEEEREEEREEEREE 
RESC( TART )/TESTS: <TEST-LIST>/PASS: <PASS-CNT>/FLAGS: 
<FLAG-LIST>/UNITS: <UNIT-LIST> 
RERAEEERERAEEEEAEEEEEREREEREREREAEEEEEEAEEEDAEDADAREDEEADDS 
f 


2.4.2.1 TESTS, PASS, AND FLAGS SWITCHES - 
<TEST-LIST>, <PASS-CNT>, AND <FLAG-LIST> ARE AS IN THE START 


2.4.2.2 UNITS SWITCH (/UNITS:<UNIT-LIST>) - <UNIT-LIST> IS A SEQUENCE 
OF DECIMAL NUMBERS (0,1 ETC.) OR RANGES OF DECIMAL NUMBERS (0-5, 8-10 
ETC.) THAT SPECIFY THE UNITS TO BE TESTED. THE ~<*-§: ARE SEPARATED 
BY COLONS. THE NUMBERS MAY RANGE FROM O THRU N-1 (N IS THE NUMBER OF 
UNITS SPECIFIED IN THE PREVIOUS START COMMAND). THE NUMSER INDICATES 
THE POSITION OF THE P-TABLE AS THE DATA WAS ENTERED DURING THE 
HARDWARE DIAGLOGUE. THE UNITS WHICH ARE SELECTED MUST NOT HAVE BEEN 
DROPPED BY THE DROP COMMAND. SEE THE DISCUSSION OF ADD AND DROP 
COMMANDS BELOW. DEFAULT IS TO TEST ALL UNITS WHICH HAVE NOT BEEN 
DROPPED BY A DROP COMMAND. 


2.4.2.3 EFFECT OF RESTART COMMAND - 


THE RESTART COMMAND DIFFERS FROM THE START COMMAND IN THAT THE 
P-TABLES FROM THE PREVIOUS START COMMAND (THERE MUST HAVE BEEN ONE) 
ARE USED, INSTEAD OF NEW ONES BEING BUILT. THE UNITS SWITCH SHOULD 

TH THIS PROGRAM HE I 


COMMAND MODE 3 

THE REQUESTED NUMBER OF PASSES HAVE BEEN MADE, 8B) ERROR WAS 
ENCOUNTERED WITH THE HALT ON ERROR FLAG SET, ORC) A *CONTROL/C WAS 
ENTERED BY THE OPERATOR. 


2.4.3 CONTINUE COMMAND - 
SROEEEESEEESEEESEEESEEESEEEEEESEEEEEEEESEEEEEESEREEEEEEEEDE 
CONC TINUE )/PASS : <PASS-CNT/FLAGS : <FLAG-LIST> 

SOLES EEEEEEEEEEEEEEEOOEO66606600666000066600606000060000866 


2.4.3.1 FLAG SWITCH (/FLAGS:<FLAG-LIST>) - 


<FLAG-LIST> IS SAME AS IN THE START COMMAND, BUT UNSPECIFIED 
FLAGS RETAIN THEIR CURRENT VALUE. 


M1 
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2.4.3.2 EFFECT OF CONTINUE COMMAND - 


CONTINUE MUST FOLLOW A START OR RESTART, AND COMMAND MODE MUST 
HAVE BEEN ENTERED DUE TO A HALT ON ERROR OR A CONTROL/C. THE EFFECT 
OF THE COMMAND IS TO GO TO THE BEGINNING OF THE TEST THAT WAS BEING 
EXECUTED WHEN THE HALT OR CONTROL/C TOOK PLACE. SOFTWARE DIALOGUE MAY 
OPTIONALLY BE REEXECUTED. HARDWARE PARAMETERS MAY NOT BE CHANGED. 


2.4.4 PROCEED COMMAND - 
RREEAEREREREERERESEREREREDEEEEEESEREOEEEEEEEEADEEREEEEEDEDE 
PROC CEED )/FLAGS: <FLAG-LIST> 
RERAPEEEAEEEEEEEEERESEEEESESESEEEREEEEEEEEEEEEDEEEREREEEDE 


2.4.4.1 FLAGS SWITCH (/FLAGS:<FLAG-LIST>) - 


<FLAG-LIST> IS A IN THE START COMMAND, BUT UNSPECIFIED FLAGS 
RETAIN THEIR CURRENT VALUE. 


2.4.4.2 EFFECT OF PROCEED COMMAND - 


PROCEED MUST FOLLOW A START, RESTART, OR CONTINUE. COMMAND MODE 
MUST HAVE BEEN ENTERED VIA A HALT ON ERROR. THE EFFECT OF THE COMMAND 
IS TO BEGIN EXECUTION AT THE LOCATION FOLLOWING THE ERROR CALL. 
NEITHER HARDWARE NOR SOFTWARE PARAMETERS MAY BE ALTERED. 


2.4.5 ADD COMMAND - 
SELESEOEEESEDSEESESEEESESESESOEEEEESEREEDEEEEEEEEEEEEEDEDDES 
ADD/UNITS: <UNIT-LIST> 
SHEE EEEEEEEEEOEEEEEEEEEEEEEEEEEDEEEELEOEEES00000000000060086 


2.4.6 EFFECT OF ADD COMMAND - 

THE UNITS SPECIFIED ARE ADDED TO THE TEST SEQUENCE. EACH 
UNIT MUST HAVE A_ P-TABLE IN MEMORY DUE TO AN EARLIER 
HARDWARE DIALOGUE. THIS COMMAND MUST BE FOLLOWED BY A 
RESTART OR CONTINUE. THE UNITS SWITCH MUST BE SPECIFIED. 
THE ADD COMMAND IS MEANINGFUL ONLY FOR UNITS THAT WERE 
PREVIOUSLY DROPPED. 


2.4.7 OROP COMMAND - 
BOEE6OEE6O66606606606606600660666660666600600660000600060000008 
DROCP)/UNITS: <UNIT-LIST> 
BEDEEEEEERESESEOEESEESEEEEEEEEEOE66606660660006000006000808 


— 
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2.4.8 EFFECT OF DROP COMMAND - 


THE UNITS SPECIFIED WILL BE DROPPED FROM TESTING. THE UNITS 


WILL BE RESELECTED ONLY BY THE EXECUTION OF AN ADD 


OR START 


COMMAND. THE UNITS SWITCH MUST BE ENTERED. THIS COMMAND 


MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND 


2.4.9 PRINT COMMAND - 


SLAKSAESSAAAAAASRSSEKEAAARHASEAAAAEAREAALAEREREAEARERAAEEREBEEEDR 


PRICNT) 


SAFAAAKEASAAAAEAEAAAESAEERERARASREAERAREEAEEAEEAAAESERAEEEEE 


2.4.9.1 EFFECT OF PRINT C 


OMMAND - 
THE TOTAL NUMBER OF ERRORS FOR EACH UNIT SINCE THE LAST 
START OR RESTART COMMAND ARE PRINTED. THE ISR CINHIBIT 


STATISTICAL REPORTING) FLAG IS CLEARED. 


2.4.10 DISPLAY COMMAND - 


REECE RRREAEAHARARRE KER ERE RERRAARERERAERAEHAKEAALHRHRARR RHR HAES 


DISCPLAY )/UNITS: <UNIT-LIST> 


SESKESSASEAAESASESSSSESAASESEASEASESAAERESEARSERESESEAREEAEEEEDE 


2.4.10.1 EFFECT OF DISPLAY COMMAND - 


THE HARDWARE P-TABLE FOR THE TEST STATION IS PRINTED IN THE 


FORMAT IN WHICH IT WAS ENTERED. 


2.4.11 FLAGS COMMAND - 


SHESESESASESESEEEEEEEESEAEAESEHSEEESERSEESEESEEEEEEEEEEASESREESESRESD 


FLACGS) 


SESASFSEAEEEEASESEESESSEASEEEEESEEEEEESEEEAEEEEEESEESEEEESEREEDEE 


2.4.11.1 EFFECT OF FLAGS COMMAND - 
THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED. 


B2 
t.. 
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2.4.12 ZFLAGS COMMAND - 
PeVUIIITititiririrititiiiiiitiriiiitiiiiiiittiiiitiii tii iiT) 
ZFLCAGS) 


SHESSSSAESHESESASHESEESSEESSEEESEEHEAESEESEHESEHEEEEOEEEEAEAREESE 


2.4.13 ZFLAGS COMMAND - 
ALL *LAGS ARE CLEARED. 


2.4.14 CONTROL CHARACTERS - 


C A_CONTROL/C (C) ENTERED OURING THE EXECUTION OF A 
DIAGNOSTIC CAUSES A RETURN TO COMMAND MODE. 


Z A_CONTROL/Z (2) ENTERED OURING ONE OF THE TWO 
OPERATOR DIALOGUES-- HARDWARE P-TABLE OIALOGUE OR 
SOFTWARE P-TABLE DIALOGUE CAUSES THE DEFAULTS TO BE 
TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 


O A _CONTROL/O (0) ENTERED DURING THE EXECUTION OF A 
DIAGNOSTIC CAUSES ALL _ TELETYPE OUTPUT TO BE 
SURPRESSED FOR THE REMAINDER OF THE OIAGNOSTIC OR 
UNTIL ANOTHER CONTROL/O IS TYPED, WHICH RESTORES 
NORMAL TELETYPE OUTPUT. 


L 


oe, 
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2.5 HARDWARE QUESTIONS 


Ss. 


WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT 
THE USER FOR HARDWARE INFORMATION BY TYPTNG "CHANGE HW (L) ?” 

YOU MUST ANSWER “Y” AFTER A START COMMAND UNLESS THE HARDWARE 
INFORMATION HAS BEEN “PRELOADED” USING THE SETUP UTILITY (SEE 
CHAPTER 6 OF THE XXDP+ USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A “Y", THE RUNTIME SERVICES WILL ASK FOR THE NUMBER 
OF UNITS CIN DECIMAL). YOU WILL THEN BE ASKED THE FOLLOWING 
QUESTIONS FOR EACH UNIT. 


CSR ADDRESS - THIS QUESTION REQUESTES THE CSR ADDRESS OF THE 
SPECIFIED DHU-11. THE DEFAULT ANSWER FOR THIS QUESTION IS 
ADORESS 160460 (OCTAL). 


INTERRUPT VECTOR ADDRESS - THIS QUESTION REQUESTS THE INTERRUPT 
VECTOR ADDRESS OF THE SPECIFIED DHU-11. THE DEFAULT ANSWER 
FOR THIS QUESTION IS 310 COCTAL). 


ACTIVE LINES BIT MAP - THIS QUESTION REQUESTS AN OCTAL BIT 
MAP OF THE SERIAL COMMUNICATION LINES ON THE DHU11 WHICH ARE 
BEING SELECTED FOR TESTING. IF THE BIT IN THE BIT MAP IS SET 
WHICH CORRESPONDS TO A PARTICULAR LINE ( I.E. BIT 5S FOR LINE 
S_) THAT LINE WILL BE TESTED BY THE FVT. THE DEFAULT ANSWER 
FOR THIS QUESTION IS ALL LINES I.E. 177777. 


TYPE OF LOOPBACK (1*INTERNAL, 2°H3277, 3*H325 4=MODEM 
S*KEYBOARD ECHO). 

THIS QUESTION REQUESTS THE TYPE OF LOOPBACK TO BE USED WHEN 

TESTING THE DHU-11. 

THE FOLLOWING TYPES ARE SUPPORTED: 


O INTERNAL - ONLY INTERNAL UART LOOPBACK IS TO BE USED IN 
TESTING THE DHU-11. 


O 3277 - STAGGERED BERG CONNECTOR(S) ARE INSTALLED 
ON THE BERG CONNECTOR SOCKETS OF THE OHU-11. 


O H325 - SINGLE LINE, 25 PIN LOOPBACK CONNECTORS (TYPE H325) 
ARE INSTALLED ON THE LINES TO BE TESTED. 


O MODEM - THE OPERATOR IS ALLOWED TO SET UP A MODEM LINK 
AND THEN PERFORM A TRANSMISSION AND RECEPTION TEST AT A 
SINGLE BAUDRATE WITH THE MODEM CONTROL SIGNALS DTR AND RTS 
ACTIVE. THIS IS A SPECIAL TEST AND ALL OTHER TESTS IN THIS 

PART WILL BE PERFORMED IN INTERNAL LOOPBACK. 


© KEYBOARD ECHO - THE UARTS ON THE DUT ARE PLACE” IN REMOTE 
LOOPBACK. TERMINALS (OR OTHER COMMUNICATIONS EQUIPMENT) 
oO. HAVE WHATEVER THEY TRANSMIT TO THE DHU LOOPED BACK TO 


BR LEVEL - THIS QUESTION REQUESTS THE INTERRUPT BR LEVEL OF 
THE SPECIFIED OHU-11. THE DEFAULT ANSWER IS BR 5. 


EQ 15 


De 
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2.6 SOFTWARE QUESTIONS 


AFTER YOU HAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART 
OR CONTINUE COMMAND, THE RUNTIME SERVICES WILi ASK FOR SOFTWARE 
PARAMETERS. THESE PARAMETERS WILL GOVERN SOME DIAGNOSTIC SPECIFIC 
OPERATION MODES. YOU WILL BE PROMPTED BY "CHANGE SW (L) ?” 

IF YOU WISH TO CHANGE ANY PARAMETERS, ANSWER BY TYPING 

“Y",. THE SOFTWARE QUESTIONS AND THE DEFAULT VALUES ARE DESCRIBED 
IN THE NEXT PARAGRAPH(S). 


REPORT UNIT NUMBER AS EACH UNIT IS TESTED - THIS QUESTION ASKS 
WHETHER THE PROGRAM SHOULD REPORT THE NUMBER OF THE UNIT WHICH 
IT IS TESTING AS IT BEGINS TO TEST THAT UNIT. 


REPORT NUMBER OF BITS TESTED IN DMA ADOR TEST - THIS QUESTION 
ASKS WHETHER THE OPERATOR WANTS A PRINTOUT DESCRIBING WHICH 
Sonate HAVE BEEN TESTED WHEN THE DMA ADDRESSING TEST 


EXTENDED ERROR REPORTING - THIS QUESTION ASKS WHETHER EXTENDED 
ERROR INFORMATION IS REQUIRED OTHER THAN THE “TEST FAILED” 
MESSAGE, ON EACH ERROR REPORTED. THE DEFAULT IS “NO” I.E. ONY 
a. HE SSAGE REPORTING THE FACT THAT THE TEST FAILED WILL BE 


NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE - THIS 
QUESTION IS ASKED ONLY IF THE PREVIOUS QUESTION WAS ANSWERED 
“YES”. THE QUESTION ASKS FOR THE NUMBER OF DATA ERRORS WHICH 
SHOULD BE REPORTED INDIVIDUALLY BY THIS PROGRAM FOR EACH LINE 
FOR EACH TRANSMISSION TEST. ERRORS WHICH ARE NOT REPORTED 
INDIVIDUALLY ARE REPORTED IN SUMMARY ERROR REPORTS. 


ce 
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2.7 EXTENDED P-TABLE DIALOGUE 


WHEN YOU ANSWER THE HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES 
IN A_TABLE THAT DESCRIBES THE DEVICES UNDER TEST. THE SIMPLEST 
WAY TO BUILD THIS TABLE IS TO ANSWER ALL QUESTIONS FOR EACH 

UNIT TO BE TESTED. IF YOU HAVE A MULTIPLEXED DEVICE SUCH AS 

A MASS STORAGE CONTROLLER WITH SEVERAL DRIVES OR A COMMUNICATION 
DEVICE WITH SEVERAL LINES, THIS BECOMES TEDIOUS SINCE MOST OF 
THE ANSWERS ARE REPETITIOUS. 


TO ILLUSTRATE A MORE EFFICIENT METHOD, SUPPOSE YOU ARE TESTING 


A FICTIONAL DEVICE, THE XY11. 


SUPPOSE THIS DEVICE CONSISTS OF 


A CONTROL MODULE WITH EIGHT UNITS (SUB-DEVICES) ATTACHED TO IT. 


THESE UNITS ARE DESCRIBED 
IS ONE HARDWARE 


BY THE OCTAL 


NUMBERS O THROUGH 7. THERE 


PARAMETER THAT CAN VARY AMONG UNITS CALLED THE 
Q-FACTOR. THIS Q-FACTOR MAY BE O OR 1. 
TO BUILD A TABLE FOR ONE XY11 WITH EIGHT UNITS. 


@ UNITS (D) ? 8<CR> 


UNIT 1 
CSR ADDRESS (0 


)._?_ 160000<CR> 


SUB-DEVICE @ (0) ? O<CR> 


Q-FACTOR (0) 0 ? 1<CR> 

UNIT 2 

CSR ADORESS (0) ? 160000<CR> 
SUB-DEVICE @ co). ? 1<CR> 
Q-FACTOR (0) 1 O<CR> 


UNIT 3 
CSR ADORESS (0) ? 160000<CR> 


SUB-DEVICE @ (0) ? 2<CR> 


Q-FACTOR (0) 0 ? 


<CR> 


)._?_ 160000<CR> 


ADORESS (0 
SUB-DEVICE # (0) ? 3<CR> 


Q-FACTOR (0) 0 ? 


<CR> 


160000<CR> 


(0) ? 
SUB-DEVICE @ oe ? 4<CR> 


Q-FACTOR (0) O ? 


UNIT 6 
CSR ADDRESS (0 


<CR> 


).?  160000<CR> 


SUB-DEVICE @ (0) ? 5<CR> 


Q-FACTOR (0) 0 ? 
T7 


UNI 
CSR ADORESS (0) ? 160000<CR> 


<CR> 


SUB-DEVICE @ (0) ? 6<CR> 


Q-FACTOR (0) 0 ? 


1<CR> 


BELOW IS A SIMPLE WAY 


SEQ 17 


FO 
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UNIT 8 

CSR ADDRESS (0) 160000<CR> 
SUB-DEVICE @ (0) ? 7<CR> 
Q-FACTOR (0) 1 ? <CR> 


NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR CHANGES WHEN A 
NON-DEFAULT RESPONSE IS GIVEN. BE CAREFUL WHEN SPECIFYING 
MULTIPLE UNITS! 


AS YOU CAN SEE FROM THE ABOVE EXAMPLE, THE HARDWARE PARAMETERS 
DO NOT VARY SIGNIFICANTLY FROM UNIT TO UNIT. THE PROCEDURE SHOWN IS 
NOT VERY EFFICIENT. 


THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIFICATIONS HOWEVER. 
ORT ee THE SAME TABLE USING THE MULTIPLE SPECIFICATION 


@ UNITS (0D) ? 8<CR> 


UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 0,1<CR> 
Q-FACTOR (0) 0 ? 1,0<CR> 


UNIT 3 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ?  2-5<CR> 
Q-FACTOR (0) 0 ? O<CR> 


€O) ?_ 160000<CR> 
SUB-DEVICE @ (0) ? 6,7<CR> 
Q-FACTOR (0) 0 ? 1<CR> 


AS YOU CAN SEE IN THE ABOVE DIALOGUE, THE RUNTIME SERVICES WILL 
BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN ANY 
ONE PASS THROUGH THE QUESTIONS. IN THE FIRST PASS, TWO ENTRIES 
ARE BUILT SINCE TWO SUB-DEVICES AND Q-FACTORS WERE SPECIFIED. THE 
SERVICES ASSUME THAT THE CSR ADORESS IS 160000 FOR BOTH SINCE IT 
WAS SPECIFIED ONLY ONCE. IN THE SECOND PASS, FOUR ENTRIES WERE 
BUILT. say # IS BECAUSE FOUR SUB-DEVICES — Seat he THE 


ON AN 
THE FOUR ENTRIES ARE ASSUMED TO BE 160000 AND O RESPECTIVELY 
SINCE THEY WERE ONLY SPECIFIED ONCE. THE LAST TWO UNITS ARE 
SPECIFIED IN THE THIRD PASS. 


THE WHOLE PROCESS COULD HAVE BEEN ACCOMPLISHED IN ONE PASS AS 
SHOWN BELOW. 


@ UNITS (0) ? 6<CR> 


SEQ 18 


Ge 
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UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 0-7<CR> 
Q-FACTOR (0) 0 ? 0,1,0,..,.1,1<CR> 


AS YOU CAN SEE FROM THIS EXAMPLE, NULL REPLIES (COMMAS ENCLOSING 
A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LAST REPLY. 


SEQ 19 


H2 
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2.8 QUICK START-UP PROCEDURE (XXDP+) 
TO START-UP THIS PROGRAM: 
1. 


now ®s 


BOOT XXDP-+ 


GIVE THE DATE AND ANSWER THE LSI AND SOHZ (CIF THERE 
IS A CLOCK) QUESTIONS 


TYPE “R NAME”, WHERE NAME IS THE NAME OF THE BIN OR 
BIC FILE FOR THIS PROGRAM 


TYPE “START” 

ANSWER THE “CHANGE HW" QUESTION WITH “Y" 

ANSWER ALL THE HARDWARE QUESTIONS 

ANSWER THE “CHANGE SW” QUESTION WITH “N” 

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THE 


DEFAULTS FOR FLAGS AND SOFTWARE PARAMETERS. FOR DEFAULT INFORMATION 
SEE THE SECTIONS WITHIN THIS DOCUMENT ON FLAGS,AND HARDWARE QUESTIONS. 


3.0 ERROR INFORMATION 
3.1 TYPES OF ERROR MESSAGES 


THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 

A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR MESSAGES 

ARE ALWAYS PRINTED UNLESS THE “IER” FLAG IS SET (SEE THE FLAGS SECTION 
OF THIS DOCUMENT). 


THE GENERAL ERROR MESSAGE IS OF THE FORM: 


NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PC: XXXXXX 
ERROR MESSAGE 


«WHERE; NAME = DIAGNOSTIC NAME 
TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT) 
NUMBER = ERROR NUMBER 


UNIT NUMBER = 0 - N (N IS LAST UNIT IN PTABLE) 
TST NUMBER = TEST AND SUBTEST WHERE ERROR OCCURRED 
PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL 


BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 
INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 
THE “IER” OR “IBR” FLAGS ARE SET (SEE THE FLAGS SECTION OF THIS 


DOCUMENT). 
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE. 
EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 


SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE ARE ALWAYS 
PRINTED UNLESS THE “IER”, “IBR” OR “IXR” FLAGS ARE SET (SEE THE 


seq 20 


Ie 
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FLAGS SECTION OF THIS DOCUMENT). 
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 


3.2 SPECIFIC ERROR MESSAGES 


THIS PROGRAM IS INTENDED TO PROVIDE A GO/NOGO INDICATION 
OF THE FUNCTIONALITY OF THE DHU-11 BOARDS. TO EXECUTE THE 
PROGRAM IN THIS MODE THE OPERATOR NEED ONLY ANSWER THE 
“EXTENDED ERROR REPORTING” SOFTWARE QUESTION WITH “NO”, THE 
PROGRAM WILL THEN ONLY PRINT THE NAME OF THE FAILING TEST 
THE TEST AND ERROR NUMBERS. FOR A LIST OF THE TEST NAMES 
IN THIS oO SEE THE TEST SUMMARIES SECTION OF THIS 
nt EXAMPLE OF SUCH A AN ERROR MESSAGE IS THE 


CZOHW DVC FTL _ERR 4409 ON UNIT 00 TST 04 SUB 000 PC: XXXXXX 
OMA ADDRESS TEST FAILED 


THIS ERROR INDICATES THAT A FATAL ERROR WAS ENCOUNTERED 
DURING THE TEST WHICH TESTS THE DMA_ABORT BIT. 


IF THE OPERATOR HAD REQUESTED EXTENDED ERROR REPORTING THE 
SAME ERROR WOULD BE REPORTED AS FOLLOWS: 


CZDHW OVC FTL ERR 4409 ON UNIT 00 TST 04 SUB 000 PC: XXXXXX 
DMA ADDRESS TEST FAILED 
BAD BITS BETWEEN BITS O AND 15. 


SEQ 21 


Je 
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4.0 PERFORMANCE AND PROGRESS REPORTS 


AT THE END OF EACH PASS, THE PASS COUNT IS GIVEN ALONG WITH THE 


TOTAL NUMBER OF ERRORS REPORTED SINCE THE y often tra — 


THE “EOP” SWITCH CAN BE USED TO CONTROL HOW OFTEN T 
OF PASS MESSAGE IS PRINTED. FOR FUTHER INFORMATION SEE THE 
SWITCHES SECTION OF THIS DOCUMENT. 


S.0 TEST SUMMARIES 
THE FOLLOWING ARE INCLUDED WITHIN CZDHWA: 


6.0 


DEVICE REGISTER ACCESS TEST - VERIFIES THAT THE UUT REGISTERS 
WILL RESPOND WITH THE CORRECT UNIBUS HANDSHAKING SIGNALS. 
VERIFIES THAT THE UUT IS AT THE CORRECT ADORESS. 


KEYBOARD ECHO TEST - ALLOWS THE OPERATOR TO TEST TERMINAL LINKS 
COR OTHER COMMUNICATIONS LINKS), WHICH ARE ATTACHED TO UUT 
SERIAL PORTS, FROM REMOTE ENDS OF THE LINKS. 


MODEM LOOPBACK TEST - ALLOWS THE OPERATOR TO TEST MODEM LINKS 
WHICH ARE ATTACHED TO THE UUT SERIAL PORTS. 


OMA ADOR TEST - VERIFIES THAT THE UUT CAN ACCESS THE FULL 
MEMORY WHICH IS ON THE MACHINE VIA DMA ACCESS. 


FRAMING ERROR TEST - VERIFIES THAT FORCED FRAMING ERRORS ARE 
REPORTED CORRECTLY. 


PARITY ERROR TEST - VERIFIES THAT FORCED PARITY ERRORS ARE 
REPORTED CORRECTL 


OMA MODE TEST - VERIFIES THAT THE UUT WILL TX AND RX DATA 
CORRECTLY USING DMA TRANSMISSION. 


SPLIT SPEED TEST - VERIFIES THAT THE UUT WILL FUNCTION 
CORRECTLY USING DIFFERENT TX AND RX SPEEDS ON EACH ACTIVE LINE. 


REPORT BMP CODES TEST - THIS PSEUDO TEST REPORTS THE FIRST 32 
CHARACTERS WHICH WERE DISCOVERED IN THE FIFO DURING THE 
EXECUTION OF THE OTHER TESTS. THIS AVOIDS INTERRUPTION OF THE 
OTHER TESTS BY THESE CODES IF THEY ARE NOT CRITICAL TO THE 
PERFORMANCE OF THE TESTS. 


EXAMPLE ERROR FREE PASS 
THE FOLLOWING IS AN EXAMPLE OF AN ERROR FREE PASS DIALOGUE: 


SEQ 22 


Ke 
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-R CZOHWAO 
CZDHWAO .BIN 
ORS 


CZDHW-A-0 

OHU FUNC TST PARTS 
UNIT IS DHU-11 
RESTRT ADDR: 147670 
DR>STA/PAS:1 

CHANGE HW (L) ? Y 


@ UNITS (0) 2? 2 
TO 
CSR ADDRESS: (0) 160460 ? 1tZ 


1 
CSR ADDRESS: (0) 160460 ? 160500 
INTERRUPT VECTOR ADDRESS: (0) 310 ? 320 
ACTIVE LINE BIT MAP: (0) 177777 ? <CR> 
TYPE OF LOOPBACK (C1=INTERNAL, 2*H3277, 3*H325 
4=MODEM, S=*KEYBOARD ECHO): (0) 2 ?1 
INTERRUPT BR LEVEL: (0) S ? <CR> 


CHANGE SW (lL) ? Y 

REPORT UNIT NUMBER AS EACH UNIT IS yb! (L) Y ? <CR> 
REPORT NUMBER OF BITS TESTED IN DMA ADDR TEST: (L) N ? <CR> 
EXTENDED ERROR REPORTING: (L) N ? <CR> 

TESTING UNIT : 0 

TESTING UNIT : 1 


CZDOHW EOP 1 
0 TOTAL ERRS 


DR> 


-LIST SEQ,LOC,BIN,MEB 
NLIST CNO 


-SBTTL PROGRAM HEADER 





Le 
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1032 
1033 
1034 -MCALL SVC 
pes 000000 svc ; INITIALIZE SUPERVISOR MACROS 
1037 ; 
1038 F IF STRUCTURED MACROS ARE TO BE USED, ADD “.MCALL STRUCT” AND “STRUCT” 
eae 3 TO INITIALIZE THE STRUCTURED MACROS. 
1 
1041 000001 SVCINS= 1 ; LIST INSTRUCTIONS, SHIFTED RIGHT 
1042 000001 SVCTST= 1 ; LIST TEST TAGS, SHIFTED RIGHT 
1043 000001 SVCSUB= 1 ; LIST SUBTEST TAGS, SHIFTED RIGHT 
1044 000001 SVCGBL= 1 ; LIST GLOBAL TAGS, SHIFTED RIGHT 
Meas 000001 SVCTAG= 1 3; LIST OTHER TAGS, SHIFTED RIGHT 
1047 3 CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH 
1048 3 TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 
1049 3 SYMBOLS TO BE MINUS-ONE TO NOT LIST THE EXPANSIONS. YOU MAY 
— F CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 
;ESSLCS CSA ASAT SERA SHANNA SAK EKSA NAS AAS CASA SANSA TSHRAASASAAARCKASA SAA KAAR KASS SES 
1052 
1053 000000 -ENABL ABS 
1054 ; .ENABL 
1055 002000 P s 2000 
1056 
1057 002000 BGNMOD 
1058 
1059 zee 
1060 ; THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
os ; THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 
geo 
1063 
oe 002000 POINTER BGNRPT ,.BGNSW,BGNSFT ,BGNOU,ERRTBL 
1082 
1083 002000 HEADER CZDHW,A,0,200,0,PRIO7 
002000 
002000 103 
002001 132 
002002 104 
002003 110 
002004 127 
002005 000 
002006 000 
002007 000 
002010 
002010 101 
002011 
002011 060 
002012 
002012 000000 
002014 
002014 000200 
002016 
002016 036702 
002020 
002020 037246 





PROGRAM HEADE 


002150 
002162 
037636 
000000 


Me 
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LSHPTP:: 
L$SPTP;:: 
L$LADP:: 
— 
L$Co:: 
LSOTYP:: 
LSAPT:: 
LSDOTP:: 
L$PRIO:: 
LSENVI:: 
LSEXPi:: 
LSMREV:: 


58 


SEEEE 


. eo 

ow 
<< 
44 
mm 


LSEF:: 


L$SPC:: 
LSDEVP:: 
LSREPP::— 
LSexPa:: 
LSEXPS:: 
LSAUT:: 
L$OUT:;: 
LSLUN:: 
LSDESP:: 
LSLOAD: : 
LSETP:: 
LSICP:: 
LSCCP:: 
LSACP:: 
LSPRT:: 


SESETESEREEEEEE 


LSHWw 
L$Sw 
L$LAST 
ie) 
ie) 
0 


. 
LSDISPATCH 

PRIO7 

0 


0 


CSREVISION 
CsEDIT 


oO 
0 


t+) 
LsOvTYP 
L$RPT 


L$DESC 
ESLOAD 
LSERRTBL 
LSINIT 
LSCLEAN 
LSAUTO 
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1084 


HEADER 


027660 
000000 
000000 
000000 


Ne 


.WOR 
LSTEST:: 
LSOLY:: : 
LSHIME:: 


SEQ 26 


Laicbistetgieecllliiaaesteaaaaiiabaadamsmninnmen 


BS 
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1104 


-SBTTL OISPATCH TABLE 


zee 
; THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 


; IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 


DISPATCH 9 


. WORD 
LSDOISPATCH: : 
. WORD 


5555538 


SEQ 27 


= S$ +e Ce ee C+ 


oa 
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1112 
1113 


SEQ 28 


MSCSTMSCSAGASH BG SHCGSSHSSCCCSSS DM SSSTASSGSAGAKGS CHS GSSSIAGASOSSLSLVAGS NA SSH SSS 


3 
; FVTA.OHT 


| SULASS AS ASNEESS SEEN NEE EEEEES SERN NENEE REESE ENSSSERSSNNNNKNNNNNENennnnnNNNnnKnnenK | 


-SBTTL DEFAULT HARDWARE P-TABLE 


soe 

s THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 
s THE TEST-DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 
s IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLES, 
s AND IS USED AS A “TEMPLATE” FOR BUILDING THE P-TABLES. 
"alia 


BGNHW =F PTBL 


L$HW:;: 
OFPTBL:: 
WORD 160460 ;DEFAULT CSR ADDRESS 
. WORD 310 sOEFAULT VECTOR ADDRESS 
. WORD 177777 ;DEFAULT ACTIVE eee BIT MAP 
-BYTE 2 sDEFAULT LOOPBACK MODE 
-BYTE 5 sDEFAULT BR LEVEL 
ENDHW 
10000: 


«WORD L10000-L $HW/2 


D4 
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DEFAULT HARDWARE P-TABLE 


1140 
1141 


1142 
1143 


002160 
002160 
002162 
002162 


002162 
002164 


002166 
002166 


{SAASSASSSCAGTCSSSISSASSSASASAIS GSAS GSASGK SG SSSISS HS SAKAASAASSAAGAGHAASAASTSNSASASS SASS 


FVTA.SWT 


-SBTTL SOFTWARE P-TABLE 


aoe 
s THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BY THE 


s PROGRAM AS OPERATIONAL PARAMETERS. 


THESE PARAMETERS ARE 


s SET UP AT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR 
s AT RUN TIME, 


BGNSW 


OPTION: : 
NDERPT:: 


ENOSW 


SFPTBL 


20 
0 


| 
| 
| 


-WORD L10001-L$SW/2 


L$SW:: 
SFPTBL:: 


sBIT MAP OF PROGRAM CONTROL FLAGS 


sOEFAULT NUMBER OF INDIVIDUAL DATA ERRORS TO RPT. 


L10001: 


.2 
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SOFTWARE P-TABLE 
1165 
1166 ,SSEASSKASAAA PSEA AAAS ASCH SECAKGELLCASLASKGLSKSEGIAKS CANCE AAGOCSASDSATEHEADAASERARAEASEESASSA MS 
1167 3 
1168 3 FVTA.EQU 
1169 ; 
1170 , SSHAAA AAAS A SSP SAAASKSRSAGA SUAS SSASSSAHAADA ASDA LC SESKADHASAKBAAESCAAAAAASASSAASAEDASESSES 
1171 
1172 
tts -SBTTL GLOBAL EQUATES SECTION 
1184 
1185 
1187 
s¢ 
1188 3 THE GLOBAL EQUATES SECTION — PROGRAM EQUATES THAT 
1189 3 ARE USED IN MORE THAN ONE TEST. 
i191 = 
1192 000020 NUMLNS==20 sNUMBER OF LINES ON DHV11 IS 8. 
ties 177777 MAPLNS**177777 ;BIT MAP OF LINES ON DOHV11. 
1195 3¢eeeee DEVICE REGISTER OFFSETS FROM THE CSR'S ADDRESS seeeee 
1196 000000 CSRO=20 sCSR REGISTER OFFSET FROM THE CSR ADDRESS 
1197 000002 RBUFO==2 sRECEIVE REGISTER OFFSET FROM THE CSR ADDRESS 
1198 000002 RXTIMO=<2 sRECIEVE TIMER REGISTER OFFSET FROM THE CSR ADORESS 
1199 000004 LPRO==24 sLINE PARAMETER REGISTER OFFSET FROM THE CSR ADORESS 
1200 000006 FSLSO=6 sFIFOSIZE/STATUS REGISTER OFFSET FROM THE CSR ADDRESS 
1201 000006 FDATO=<6 sFIFODATA REGISTER OFFSET FROM THE CSR ADORESS 
1202 000010 LNCTRO==10 sLINE CONTROL REGISTER OFFSET FROM THE CSR ADORESS 
1203 000012 TXAD10==212 s TRANSMIT ADORESS 1 REGISTER OFFSET FROM THE CSR ADORESS 
1204 000014 TXAD20=214 s TRANSMIT ADDRESS 2 REGISTER OFFSET FROM THE CSR ADORESS 
oor 000016 TXBFCO==16 s TRANSMIT COUNT REGISTER OFFSET FROM THE CSR ADORESS 
1207 3@eeeee EQUATES USED WITH RESPECT TO THE RX BUFFER eseece 
1208 000020 RXBETX==16. sLEVEL OF RX BUFFER AT WHICH TO RE-ENABLE TRANSMISSION. 
1209 000030 RXBOTX==24, sLEVEL OF RX BUFFER AT WHICH TO DISABLE TRANSMISSION. 
ert 000100 RXBFUL = 264, sTOTAL CHARACTER CAPACITY OF THE RX BUFFER. 
1212 
1227 002166 EQUALS 
’ 
s BIT DIFINITIONS 
3 
100000 BIT1S<«= 100000 
040000 BIT14== 40000 
020000 BIT13== 20000 
010000 BIT12<«= 10000 
BIT1i1l== 4000 
002000 BIT102«= 2000 
001000 BITO9«= 1000 
000400 BITOB== 400 
000200 BITO7== 200 
000100 BITO6== 100 
BITOS=«= 40 
000020 BITO4== 20 
000010 BITO3<= 1 
BITO2=+= 4 


F3 
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GLOBAL EQUATES SECTION 
000002 BITO1== 2 
000001 BITOO== 1 
H 
001000 BIT9s= BITO9 
000400 BIT8== BITOS8 
000200 BIT7*= BITO7 
000100 BIT6*s= BITO6 
000040 BITS=*= BITOS 
000020 BIT4*s=* BITO4 
000010 BIT3=«= BITOS 
000004 BIT2*= BITO2 
000002 BITi== BITOL 
000001 BITO=s= BITOO 
: 
s EVENT FLAG DEFINITIONS 
3 EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 
a 
000040 EF .START== 32. 3 START COMMAND WAS ISSUED 
000037 EF .RESTART== 31. 3s RESTART COMMAND WAS ISSUED 
000036 EF .CONTINUE== 30. s CONTINUE COMMAND WAS ISSUED 
000035 EF .NEW== 29. s A NEW PASS HAS BEEN STARTED 
000034 EF .PWR== 28. : A POWER-FAIL/POWER-UP OCCURRED 
3 
i 
s PRIORITY LEVEL DEFINITIONS 
3 
000340 PRIO7*= 340 
000300 PRIO6== 300 
000240 PRIOS«= 240 
000200 PRIO4"2 200 
000140 PRIO3=*= 140 
000100 PRIO2*= 100 
000040 PRIOi== 40 
000000 PRIOO== 0 
8 
sOPERATOR FLAG BITS 
i 
000004 EVL== 4 
000010 LOT#= 10 
000020 ADR«= 
000040 IDU== 40 
000100 ISRe= 100 
UAMes 
000400 BOE += 400 
001000 PNT== 1000 
PRI== 2000 
00400 IXE== 4000 
010000 IBE*= 10000 
020000 IER== 
040000 LOE*= 40000 
100000 HOE== 100000 
1228 


1285 002244 
1286 002246 


{SASS S CMSA SASTK EAS SAS SGSSKK SSA TAGTAKSKSHSMSSS HSK ASSHSANEK SENS SASSER 


; ) FVTC.GOT 
i 
, SCSKCACAAGKAAAKAHSAKADLSSSLSSHCATSASSACSALGGAAGSAEKSSAAAAASSAAS SESH ACASGASBKEDAS 


G3 
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-SBTTL GLOBAL DATA SECTION 


$¢ 
: THE GLOBAL DATA te CONTAINS DATA THAT ARE USED 


s IN MORE THAN ONE T 
gee 


FPAOREEEAEEEESESESEREEEEEEEEEEEEOEEEEEEEEEEEEEEEEEEEEEREDEEEOEREREREEEE 
: UNIT VARIBLE AREA 
§ PRAOESEEESEESOEESEEESEEEEEEEEESEEEEEEEEEEREEEEEEEEEEEEESEEEEEEOEREEEDES 


sRX VECTOR ADDRESS. 
sTX VECTOR ADORESS. 
sACTIVE LINE BIT MAP. 


sLOOPBACK MODE 
S INTERRUPT mg REQUEST LEVEL 
sUNIT NUMBER 


§ POROSOCEEEEEEEEEEOEEEEEEEEOOEEOOE66406660060606066006600606060000000600068 
DEVICE REGISTER ADDRESS TABLE 


GPEERKE SHESEHESAAARAEAHAHKABAHASAHAHAARESAREHASEARKHSHEALEESHASCHEEAOREHESHEAD 


sOHU-11 CSR ADDRESS. 

sOHU-11 RECIEVE BUFFER/TIMER ADDRESS. 

sOHU-11 LINE PARAMETER REGISTER ADORESS. 

sOHU-11 FIFO SIZE/LINE STATUS REGISTER ADORESS, 
sAND FIFO DATA REGISTER ADORESS. 

:DHU-11 LINE CONTROL REGISTER ADORESS. 

sOHU-11 TRANSMIT BUFFER 1 REGISTER ADORESS 
sOHU-11 TRANSMIT BUFFER 2 REGISTER ADDRESS 
sOHU-11 TRANSMIT BUFFER COUNT REGISTER ADORESS 


§ SO6O0606666006600660060606006066606066600660006000006006000000006000000000000008 
ASSORTED GLOBAL VARIABLES: 
§ POSEESSEEESOEESSSSEEESEEEESEEESESSEESSESESESESEEEEEEESEEOESEREDEEEEEDOEEEEOEES 


000300 RXVECA:: .WORD 
000304 TXVECA:: .WORD 
000377 ACTLNS:: . 
LOPBCK:: .BYTE 
004 BRLEVL:: .BYTE 
000000 UNITN:: .WORD 
DRADRT: : 
160020 CSRA:: .WORD 
160022 RXTMA:: RBUFA:: .WORD 
160024 LPRA:: .WORD 
160026 FDATA:: FSLSA:: .WORD 
160030 LNCTRA:: .WORD 
160032 TXAD1A:: .WORD 
160034 “ TXAD2A:: .WORD 
160036 TXBFCA:: .WORD 
000000 CTRLCF:: .WORD 
000000 OMTSTA:: .WORD 
000000 FERROR:: .WORD 
000000 FFREM:: .WORD 
000000 :3: .WORD 
000000 IBM: : WORD 
000000 IESTAT:: .WORD 
031463 LGRP1M:: .WORD 
146314 LGRP2M:: .WORD 
000000 PASCNT:: .WORD 
000000 PMSFLG:: .WORD 
000000 RXTOUT: : . WORD 


sWORD FOR GMANXX CALL RETURN PARAMETERS. 
sINACTIVE TX/RX BITS MASK. 

sSTORAGE FOR STATES OF THE DUT INT ENABLE BITS. 
iBIT MAP OF LINES IN LINE GROUP I. 

s68IT MAP OF LINES IN LINE GROUP ITI. 

sSTO'G FOR PASS COUNT USED IN ROM VERSION@ TST. 
sFLAG INDICATING WHETHER TO PRINT MODEM STATUS. 
sTIME-OUT VALUE FOR WAITING FOR LAST RX CHAR. 


H3 
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1287 002250 000000 SAVPRI:: .WORD 0 sSTO‘'G FOR PROCESSOR PRIORITY, (TXROFF, TXRON). 
1288 002252 000000 SAVTEN:: .WORD O sSTORAGE FOR TX.ENABLE STATES, (CTXROFF, TXRON). 
1289 002254 000000 TP4FLG:: .WORD 0 sFLAGS SET WHEN AN EXPECTED 004 TRAF OCCURS. 
1290 002256 000000 TP4VEC:; .WORD 0 sSTORAGE FOR THE NORMAL 004 TRAP VECTOR. 
1291 002260 000001 TSTNUM:: .WORD 1 sSTORAGE FOR THE TEST NUMBER. 
2292 002262 000000 TXENBM:: .WORD O sSTORAGE FOR TX.ENABLE STATES, oe MGM’ NT). 
1293 002264 000000 TXINTF;:: .WORD O sSTORAGE FOR TRANSMIT INTERRUPT FLAGS. 
344 002266 000000 WORD1:: .WORD 0 sLOCATION FOR PASSING INDIRECT PARAMETERS. 
1296 j PPRSOAERESEESESEESEESEEOEESEEEEEESESEESEOEESESEREAEEEDEEDEEEDEDEEEEEDEEEDEEEEES 
1297 ; LINE TIME CLOCK VARIABLES AND STORAGE. 
1298 {PARDEE EERESEEEEEEEDAEEEEEEEEREDEEEEEEDEEEOEEOEE006066066006060006000600000046006 
1299 002270 177546 CLKCSR:: .WORD 177546 ;CSR ADORESS OF THE LTC. 
1300 002272 000300 CLKBRL:: .WORD PRIO6 ;INTERRUPT PRIORITY LEVEL OF THE LTC. 
1301 002274 000100 CLKVEC:: .WORD 100 s INTERRUPT VECTOR ADORESS OF THE LTC. 
1302 002276 000074 CLKHRZ:: .WORD 60. s INTERRUPT FREQUENCY OF THE LTC 
1303 300 000000 TIMER1:: .WORD O sHAROWARE CLOCK COUNTER 1. 
1304 002302 000000 TIMER2:: .WORD O SI roUene CLOCK COUNTER 62 
1305 002304 000170 :: .WORD 120. BREAK COUNTER LOCATION 
1306 306 000170 BCOUNT:: .WORD 120. ;BREAK COUNT VALUE IN CLOCK TICKS. 
1307 002310 000021 MSTICK:: .WORD 17. sNUMBER OF MILLI-SECONDS PER LTC TICK. 
yor 002312 000062 MSLCNT:: .WORD 62 ;LOOP COUNT CUSED BY MSLOOP) TO DELAY 1 MS. 
1310 § PROOREOOEEEERESEEEESEEEEEEEENEEEEEEEEEEOEE0660660660660660660066006006006600006 
1311 ’ MEMMORY MANAGEMENT VARIABLES AND FLAGS. 
1312 § OOOOOSOOOO0606606006606666066660666666606006600660066000060000660006000000000008 
13135 002314 177572 MMSRO:: .WORD 177572 ,;ADORESS OF MEM MGT STATUS REGISTER #0. 
1314 002316 172516 MMSR3:: .WORD 172516 ;ADORESS OF MEM MGT STATUS REGISTER #3. 
1315 002320 000000 MMPRES:: .WORD 0 sMEM MGT PRESENT FLAG (O IF MM NOT PRESENT). 
ig 002322 000000 MMENAB:: .WORD 0 sMEM MGT ENABLED FLAG (O IF MM NOT ENABLED). 
1318 002324 PARATB: : sBASE OF MEM MGT PAR ADORESS TABLE 
1319 002324 172340 :: .WORD 172340 ;ADORESS OF MEM MGT ° 
1320 002326 172342 PARIA:: .WORD 172342 ;ADORESS OF MEM MGT PAR #1. 
1321 002330 172344 PAR2A:: .WORD 172344 ,ADORESS OF MEM MGT PAR @2 
1322 002332 172346 PARSA:: .WORD 172346 ;ADORESS OF MEM MGT PAR @3. 
1323 002334 172350 PAR4A:;: .WORD 172350 ;ADDRESS OF MEM MGT PAR 04. 
1324 002336 172352 PARSA:: .WORD 172352 ,ADORESS OF MEM MGT PAR 
1325 002340 172354 :: .WORD 172354 ,;ADORESS OF MEM MGT PAR 
1326 002342 172356 PAR7TA:: .WORD 172356 ,ADORESS OF MEM MGT PAR 07. 
p44 002344 PARATE: : sEND OF PAR ADORESS TABLE. 
1329 002344 PORATB: : sBASE OF MEM MGT PDR ADDRESS TABLE. 
1330 002344 172300 -WORD 172300 ;ADORESS OF MEM MGT POR #0. 
1331 002346 172302 PORIA:: .WORD 172302 ,ADORESS OF MEM MGT POR 41. 
1332 002350 172304 POR2A:: .WORD 172304 ;ADDRESS OF MEM MGT POR @2. 
1333 002352 172 PORSA:: .WORD 172306 ,;ADORESS OF MEM MGT POR @3. 
1334 002354 172310 POR4A:: .WORD 172310 ,ADDRESS OF MEM MGT POR 04. 
1335 002356 172312 :: .WORD 172312 ,ADORESS OF MEM MGT POR @5. 
1336 002360 172314 PORGA:: .WORD 172314 ,ADORESS OF MEM MGT POR #6. 
1337 002362 172316 POR7TA:: .WORD 172316 ,ADORESS OF MEM MGT POR @7. 
its 002364 PDRATE: ; sEND OF MEM MGT POR ADDRESS TABLE. 
1340 $POBOOESEEESEESSEESEEEESEEEEEEEEEEOOEEEEDEEEEEEOEEEEEEEEEDEEEEDEEEDEEEDDREEDEEES 
1341 ’ TABLE OF WORDS WITH CORRESPONDING BIT SET FOR GENERATION OF BIT MAPS. 
1342 | SOSSSEOEEESEEEEESSEOEEEEESEEEESEEEEESEOEEERESEEEESEEEESEEOEEEEDEEEEEEEDEDEEEES 
1343 002364 000001 BITTBL:: .WORD 1 sBIT O SET. 


is 
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-WORD 2 sBIT 1 SET. 
-WORD 4 sBIT 2 SET. 
-WORD 10 sBIT 3 SET. 
-WORD 20 sBIT 4 SET. 
-WORG 40 sBIT S SET 

-WORD 100 sBIT 6 SET. 
-WORD 200 sBIT 7 SET. 
-WORD 400 sBIT & SET. 
«WORD 1000 sBIT 9 SET. 
«WORD 2000 sBIT 10 SET 
-WORD 4000 sBIT 11 SET 
-WORD 10000 sBIT 12 SET 
«WORD 20000 sBIT 13 SET 
-WORD 40000 sBIT 14 SET. 
-WORD 100000 sBIT 15 SET 


§ PROROSEEAESESEEEEEEEDEEESEEEEEEEEEEEEEEEEEEEOEEEEOEEOD40666006600060600088600008 
i* TABLE OF DUT BAUDRATES 
j PPPOE EESEEEEEEESEEEEEEESEEEEEEEEREEEOEEDOO666066660660006600066006660600000008 
BRTBLB: : +BASE OF DUT —_ RATE La 

ENTRY FOR CODE 0 


: 
D 
> 
~ 
m 
z 
2 
~< 
g 
W@NAUSUNMHO 


2000. sBAUD RATE ENTRY FOR CODE 9. 
2400. sBAUD RATE ENTRY FOR CODE 10. 
4800. sBAUD RATE ENTRY FOR CODE 11. 
7200. sBAUD RATE ENTRY FOR CODE 12. 
9600. sBAUD RATE ENTRY FOR CODE 13. 
19200. sBAUD RATE ENTRY FOR CODE 14. 
sBAUD RATE ENTRY FOR CODE 15. 
BRTBLE: : sLABEL AFTER END OF DUT BAUDRATE TABLE. 
§ OOSOSOOEE6OOO6606606666006600600606606600600600606000000600600000000000000000008 
36 GPF SAVE AREAS ZERO AND ONE. 
| SOROSSSEESOSEESEEEEEEEEEEEEEEDEEOO66006000000600060006000000600000000000000000008 
A NUMBER ZERO 


oeneee#efeeee»e#sneee 


Sassssg0000958 
: 


GPRSOB: : sBASE OF GPR SAVE 

-WORD O sWORD 1, STORAGE FOR R1. 

-WORD O sWORD 2, ST F 

-WORD O sWORD 3, STORAGE FOR R3. 

. WORD 0 sWORD 4, STORAGE FOR R4. 

-WORD O sWORD S, STORAGE FOR RS. 
§96006600666606666000006606666600060666060066000000000000000000600000000000000000008 
34 TRANSMISSION AND RECEPTION VARIABLES, POINTERS, AND FLAGS. 


§ POCOESOSESEEEESEEESEEESEEESESEEEEEEESEEESEEEDEEEEESEEEEEEEEEEEEEDEEEDEEREDEEDE 
CHRTOT:: . te) sTOTAL RECEIVED CHARACTER COUNTER. 
ERSMRF s “PRINT FLAGS. 


INT ERROR SUMMARY” 
; TRANSMISSION DONE FLAGS. 
sRECEPTION DONE FLAGS. 
s"TX HAS BEEN DISABLED” FLAG. 
’ Ceeeeeeeaaeeeeeaearnccnccccecscsscacanscanaasasanassaososasccscsccssssssasencs 
; STORAGE AREA FOR THE BMP CODE QUEUE. 
§ PORSSOSEEESESEEESEDEESEEEEESEEESEDEEESESEEEDEEEEESEESEEDEESEEDEEDEEESEDOREDERS 
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002510 000000 
002512 
002712 


BMPCOP: : -WORD O sPOINTER USED TO ACCESS THE NEXT CELL IN QUE. 
BMPCQB: : -BLKW 864, sSTORAGE FOR 32 CELLS, TEST® PLUS BMP CODE. 
BMPCQE: : sLAST ADDRESS PLUS 2 OF THE BMP CODE QUEUE. 
{ PORASORESEEAAREEESEREREREEEREREEERESOREEEEEEEEEEEEEEEEEEEEEEEEEEEEDEEEEEDEDEEE 
34 RECEIVE BUFFER AND ASSOCIATED VARIABLES. 
j PPPRESRAREREEEEEEAERESEEEEAEEEEEEEDEEESEEEEEEEEEDEDAESEEREEDEEDEDEREEEEEEEEEES 
RXBOPT:;: .WORD 0 sRX BUFFER OUTPUT POINTER. 
RXBIPT;:: .WORD 0 sRX BUFFER INPUT POINTER. 
RXBCNT:: .WORD 0 sCOUNT OF NUMBER OF CHARS IN RX BUFFER. 
RXBSTA:;: sLABEL AT BEGINNING OF THE RX BUFFER. 

-BLKW = RXBFUL sLEAVE ENOUGH ROOM FOR A FULL BUFFER. 
RXBENO:: .WORD 0 sLABEL AFTER END OF RX BUFFER. 
{ PORAOAREOEEARESEEOEREESEEEEEEEESEDEEEEEDEEEEEEEEEEEOO6O6006666606000666660600008 
rT) TX/RX CONTROL BLOCK. 


j PEOAOESOADEEEEEEESEEEEEEAEEEERSEEEEEEEEEEEEESEEEEDEEEEED4OE66406000046000800008 
sBASE OF TX/RX CONTROL BLOCK. 


WORD O sLINE PARAMETER REGISTER CONTENTS. 
CBLNCA:: .WORD 0 sLINE CONTROL REGISTER CONTENTS. 
CBDPAA:: .WORD O sSTART ADDRESS OF DATA PATTERN. 
CBOPLA:: .WORD 0 ;LENGTH OF DATA PATTERN. 
CBOPNA:: .WORD 0 sNUMBER OF REPEAT TRANSMISSIONS OF THE DATA PATTERN. 
CBMAPA:: .WORD O :BIT MAP OF LINES TO INITIALISE. 
CBLPBA:: .WORD 0 sLOOPBACK MODE (AS IN LOPBCK). 
CBOFSA:: .WORD 0 sAMOUNT OF OFFSET BETWEEN EACH TX START. 


{SaaS ERADRALAERERAEEAEHAHAORAACHEEEEEADS A SRMOREHERAAAEEAREALEREASEDERHEARRERAKHER 


3% TRANSMISSION AND RECEPTION TABLES OF POINTERS AND COUNTERS. 
§ OOOSOOOO6O4E0046 3466046666000666006080666060000000600000000600000060006000000006000088 
: .BLKW 16. sTABLE OF END ADDRESSES OF DATA PATTERNS. 
OPLENS:: .BLKW 16. sTABLE OF LENGTH OF DATA PATTERNS ‘- LINES. 
EXCNTB:: .BLKW 16. sEXTRA RECEIVED CHARACTER COUNTER E. 
ERCNTB:: .BLKW 16. ‘AC RECE ERROR C Ss TARE. 
TXPTRB: : Ww 16. 3s TRANSMISSION DATA POINTERS TABLE. 
RXPTRB:: .BLKW 16 sRECEPTION DATA POINTERS T 
:: .BLKW 16. TERS TO BE TXED RXED. 

TXCNTB:: .BLKW 16. s TRANSMISSION CHARACTER COUNTERS TABLE. 
RXCNTB:: .BLKW 16. sRECEPTION CHARACTER COUNTERS TABLE. 
§ 9O06606006666006606600000006606660060006600000000060000600000000060600008066060000008 
Fy GENERAL TABLE AND BUFFER AREA--513 WORDS. 
§ O066660006606606066600600066660606006066000060600060000606000000606000000000000000044 
BUFBAS: : sBASE OF MEMORY ER. 
ERLTBL:: -BLKW 128. sFIRST HALF OF GENERAL TABLE OR BUFFER. 
BUFMID: : .BLKW 64. sSECOND HALF OF GENERAL TABLE OR BUFFER. 
BUF SQT:: -BLKW 64 sLAST QUARTER OF THE BUFFER AREA. 
BUFEND:; sEND OF GENERAL PURPOSE MEMORY BUFFER. 
ENDETB: : -BLKW 16. sBUFFER OVERFLOW SPACE. 
§ OO66606606606006666060000066666000006066060000660000000000000000000000000000000000608 
8 TABLE OF DATA PATTERN RESYNC QUEUES. 
§ 6666666666066666060000060600000006006066006000600000000000000000000000000000000008 
OPRSQB: : sDATA PATTERN RESYNC QUEUES TABLE BASE. 

-BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE O. 

-BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 1. 

-BLKW 4 sOATA PATTERN RESYNC QUEUE FOR LINE 2. 

-BLKW 4 sDATA PATTERN RESYNC QUEUE FOR L 3. 

-BLKW 4 sDATA PATTERN RESYNC QUEUE LINE 4 

-BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 5 

.BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 6. 

.BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 7. 


IK3 
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1514 005124 


156470 
167070 
177470 


-BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 8. 
-BLKW 4 sDATA PATTERN RESYNC QUEVE FOR LINE 9. 
-BLKW 4 sDATA PATTERN RESYNC QUEVE FOR LINE 10. 
-BLKW 4 sDATA PATTERN RESYNC QUEVE FOR LINE 11. 
-BLKW 4 sDATA PATTERN RESYNC QUEVE FOR LINE 12. 
-BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 13. 
-BLKW 4 sDATA PATTERN RESYNC QUEUE FOR LINE 14. 
-BLKW 4 sOATA PATTERN RESYNC QUEUE FOR LINE 15. 
OPRSQE: : sENO OF DATA PATTERN RESYNC QUEUES TABLE. 
j PPAEAAEREEEEEEEERSERERESEESARESEREREEEESEEEEEEDEEEREOREDEDREDEESEDEREREEDEEEREE 
; SINGLE CHARACTER MODE LPR FIELD TABLES. 
j PRPARREEEEEEEREEESEEEEREEEEEEEEEEEEEDEEOEEEEEEENEEEOEE4O00606004600006060006008 
SCBCTB: : sBASE OF NUMBER OF BITS PER CHAR FIELDS TABLE. 
-WORD 0 35 BITS/CHAR LPR FIELD. 
-WORD 10 36 BITS/CHAR LPR FIELD. 
-WORD 20 37 BITS/CHAR LPR FIELD. 
-WORD 30 38 BITS/CHAR LPR FIELD. 
SCBCTE:: sEND OF NUMBER OF BITS/CHAR FIELDS TABLE. 
SCBRTB: : iBASE OF BAUDRATE FIELDS TABLE. 
-WORD O 350 BAUD LPR FI 
-WORD 73400 31.2K BAUD LPR FIELDS. 
-WORD 177400 338.4K BAUD LPR FIELDS 
SCBRTE: : sEND OF BAUDRATE FIELOS TABLE. 
SCNSTB: : sBASE OF NUMBER OF STOP BITS FIELDS TABLE. 
-WORD O 31 STOP BIT LPR FIELD. 
-WORD 200 s2 STOP BITS LPR FIELD. 
SCNSTE: : sEND OF BAUDRATE FIELDS TABLE. 
SCTPTB: : sBASE OF TYPE OF PARITY FIELDS TABLE. ° 
-WORD 0 sNO PARITY LPR FIELD. 
-WORD 40 ;000 PARITY LPR FIELD. 
-WORD 140 sEVEN PARITY LPR FIELD. 
SCTPTE: : sEND OF TYPE OF PARITY FIELOS TABLE. 
§ CRERESEEEEEESEEEEEEEOOE4E6666606666606666600606066000606606000600600000000000000008 
H OMA MODE LPR FIELD TABL 


Es. 
: SET UP WITH SPECIFIED BAUDRATES, 1 STOP BIT, 90D PARITY, 8 BITS/CHAR. 
j POSRASESEOSEEESEESEESEESEEESEDESESEREREEERESEREESAESARESEEESEEESOREDEEREEEEES 


OLPRTB: : sBASE OF DMA TEST LPR FIELDS TABLE. 
-WORD 156470 39.6K BAUD. 
-WORD 167070 319. = BAUD. 
-WORD 177470 338.4K BAUD. 

OLPRTE: ; sEND OF OMA TEST LPR FIELDS TABLE. 

: Caenennnanecsssesecscaacacccacaananncansscecccssscsessossssssssssacoaassacaness 

3 SPLIT SPEED LPR PARAMETER TABLE. 

§ OOOOOO66060660660660666606066666066060660606600600000000000006000006000000000008 

SPLPRB: : sBASE OF SPLIT SPEED LPR TABLE. 
-WORD 170070 sTX: 386.4K, RX: SO BAUD, 1 STOP ODD PAR 6 BITS. 
-WORD 7470 sTX: SO, RX: 38.4K BAUD, 1 STOP ODD PAR & BITS. 
-WORD 1 sNUMBER OF REPEAT TRANSMISSIONS AT SO BAUD. 
-WORD 60. sNUMBER OF REPEAT TRANSMISS AT 38.4K BAUD. 
«WORD 70470 sTX: 1200, RX: 75 BAUD, 1 STOP ODD PAR 6 BITS. 
:>WORD 13470 sTX: 75, RX: 1200 BAUD, 1 STOP OOD PAR 6 BITS. 
-WORD 1 sNUMBER OF REPEAT TRANSMISSIONS AT 75 BAUD. 
-WORD 16 sNUMBER OF REPEAT TRANSMISSIONS AT 1200 BAUD. 
-WORD 115070 sTX: 2000, RX:2400 BAUD, 1 STOP ODD PAR 8 BITS. 
-WORD 124470 sTX: 2400, RX:2000 BAUD, 1 STOP ODD PAR 8 BITS. 
-WORD 1 iNUMBER OF REPEAT TRANSMISSIONS AT 2400 BAUD. 


GLOBAL DATA SECTION 
1515 005126 000002 


1516 005130 


ee. 
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-WORD 2 sNUMBER OF REPEAT TRANSMISSIONS AT 2000 BAUD. 
SPLPRE: : sEND OF SPLIT SPEED LPR TABLE. 
{ PPAAAAREEAAAAEEEEAREREREEEEEEEEEEEEAREROEREEAAOREAEEEEEREEEREEEEEEEEEEEEEEEEEES 
; SINGLE CHARACTER DATA PATTERN TABLE. 
j PPRAERAAERAAEREEEEAEEEEEREREREEEREREREREREREEEAREEEEEEEREREREREEEEREE DEERE REDE 
sartttccas : sSTART OF SINGLE CHARACTER DATA PATTERN TABLE. 
BYTE 10 
BYTE 17 
BYTE 63 
BYTE 74 
BYTE 125 
BYTE 177 
BYTE 200 
BYTE 252 
BYTE 303 
BYTE 314 
BYTE 360 
BYTE 367 
BYTE 376 
-BYTE 377 
SOPEND: : sEND OF SINGLE CHARACTER DATA PATTERN TABLE. 
gh te) sSTART OF FIRST SHORT DATA PATTERN OVERFLOW AREA. 
-BY 1 
-BYTE 10 
-BYTE 17 
{ ORROSSEOEEEEESEEEEEDSEESESEEESEEEESEESESEEEEERESEERESEEESEEEEEDEEEDEDEDEDEEEES 
; SINGLE CHARACTER DATA PATTERN TABLE NUMBER TWO. 
j OPORAAEREEEEEEEEEEEEEEEEESESEEESEEESEREDEEEDE SEES SEEEDEEEEEEEES. £40000000000008 
SOP2B:: .BYTE 125 sSTART OF SECOND SHORT DATA PATTERN. 
-BYTE 252 
BYTE 253 
BYTE 122 
BYTE 255 
-BYTE 112 
BYTE 
-BYTE 325 
-BYTE 152 
-BYTE 225 
BYTE 132 
-BYTE 245 
BYTE 126 
BYTE 251 
SOP2E: ; sEND OF SECOND SHORT DATA PATTERN. 
-BYTE 125 sSTART OF SECOND SHORT DATA PATTERN OVERFLOW AREA. 
BYTE 252 
BYTE 124 
-BYTE 253 
-BYTE 122 
-BYTE 
BYTE 112 
BYTE 265 
-BYTE 


M3 
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1572 005206 
1573 005207 
1574 005210 


-BYTE 152 
-BYTE 225 
-BYTE 132 
-BYTE 245 
-BYTE 126 
-BYTE 251 


SEQ 38 


FRRARAAAEAAEAASASASEAAEESESAAAEAAEEEEEAEARARAEAEELERERELEEEAESEEASEEESESEREEEBES 


j SINGLE CHARACTER SAFE PROPORTIONAL DELAY TABLE. 


J SRARAREEASASAHEREAREEAAASAASEEEAAEASEEESAAEEEEEEEEAEAESEEEEESESEEESELEREEEEEERE 


erties * 250. sDELAY IN MILLI SECONDS AT SO BAUD 


170. sDELAY IN MILLI SECONDS AT 75 BAUD 
-BYTE 119. sDELAY IN MILLI SECONDS AT 110 BAUD 
-BYTE 99. sDELAY IN MILLI SECONDS AT 134.5 BAUD 
-BYTE 90. sDELAY IN MILLI SECONDS AT 150 BAUD 
-BYTE 50. sDELAY IN MILLI SECONDS AT 300 BAUD 
-BYTE 30. sDELAY IN MILLI SECONDS AT 600 BAUD 
-BYTE 20. sDELAY IN MILLI SECONDS AT 1200 BAUD 
-BYTE 17. sDELAY IN MILLI SECONDS AT 1800 BAUD 
-BYTE 16. sDELAY IN MILLI SECONDS AT 2000 BAUD 
-BYTE 15. sDELAY IN MILLI SECONDS AT 2400 BAUD 
-BYTE 13. sDELAY IN MILLI SECONDS AT 4800 BAUD 
-BYTE 12. sDELAY IN MILLI SECONDS AT 7200 BAUD 
-BYTE 12. sDELAY IN MILLI SECONDS AT 9600 BAUD 
-BYTE 11. sDELAY IN MILLI SECONDS AT 19200 BAUD 
BYTE 10. sDELAY IN MILLI SECONDS AT 38400 BAUD 


[Sbaeeaenassaenaseacensenasnasenasacccascsacsagracceaseasscaseaasaaseacssscenss 


3# TABLE FOR STORAGE OF RX/TX LINE NUMBER ASSOCIATIONS. 
3# THE ASSOCIATIONS ARE STORED AS LINE NUMBER TIMES 2 FOR USE AS OFFSETS 
34 WHEN ACCESSING A TABLE OF WORDS. 


pe NOTE: DO NOT WRITE A NON-ZERO VALUE INTO THE UPPER BYTE OF ANY ENTRY. 


GRHAAEEHAEEERAAEREARAAARERA HEARED AERAGRASLAGALHAOMERSERAARAHRHREHRHAAEBLAERARAHA HEA 


TXRXLB: : sBASE OF TX/RX LINE NUMBER Bag ae TABLE. 

-WORD O sTX/RX LINE OFFSET FOR RX/TX LINE O. 

-WORD 2. 3 TX/RX LINE OFFSET FOR AX/TX LINE 1. 

-WORD 4. sTX/RX LINE OFFSET FOR RX/TX LINE 2. 

-WORD 6. sTX/RX LINE OFFSET FOR RX/TX LINE 3. 

-WORD 8. sTX/RX LINE OFFSET FOR RX/TX LINE 4. 

-WORD 10. sTX/RX LINE OFFSET FOR RX/TX LINE 5S. 

-WORD ie. sTX/RX LINE OFFSET FOR RX/TX LINE 6. 

-WORD 14. sTX/RX LINE OFFSET FOR RX/TX LINE 7. 

-WORD 16. sTX/RX LINE OFFSET FOR RX/TX LINE 8. 

. WORD . sTX/RX LINE OFFSET FOR RX/TX LINE 9. 

-WORD 20. sTX/RX LINE OFFSET FOR RX/TX LINE 10. 

-WORD 22. sTX/RX LINE OFFSET FOR RX/TX LINE 11. 

-WORD 24. sTX/RX LINE OFFSET FOR RX/TX LINE 12. 

-WORD 26. sTX/RX LINE OFFSET FOR RX/TX LINE 13. 

-WORD 26. sTX/RX LINE OFFSET FOR RX/TX LINE 14. 

-WORD 50. sTX/RX LINE OFFSET FOR RX/TX LINE 15. 
TXRXLE: : sEND OF TX/RX LINE ASSOCIATION TABLE. 


NUMBER 
sGUARANTEE THAT NEXT TABLE IS ON WORD BOUNDARY. 


$ O94006066660000066600060664600000000666000000000000000000000000000000000000008 


s# TABLE OF TX/RX LINE NUMBER ASSOCIATIONS IN STAGGERED LOOPBACK. 
3 THE ASSOCIATIONS ARE STORED AS LINE NUMBER TIMES 2 FOR USE AS OFFSETS 
i* WHEN wreve: A TABLE OF WORDS. 
3@ THIS IS A TABLE OF DATA FOR READING ONLY. 
3* NOTE: MUST CONVERT FROM BYTES TO WORDS WHEN LOADING ABOVE TABLE. 


USE TO LOAD THE ABOVE TABLE. 
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1661 
1662 


000000 


FARRER AREAREREEEAAERARARAEAAERREREAREEEREREEEEEREREAEREREEEEAERERAEEREAAEAEBES 


TX/RX LINE aw TABLE. 
OFFSET F 


STGTRB:: 


-BYTE 
.BYTE 
-BYTE 
BYTE 
-BYTE 
BYTE 
-BYTE 
-BYTE 
-BYTE 


-EVEN 


oooo 


N3 


;BASE vt STAGGERED 


3 TX/RX L 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 
3 TX/RX 


RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 
RX/TX 


SEQ 39 


WANAUSWMrO 


LSERRTBL: : 


10 

11 

12 

13 

14 

LINE OFFSET F LINE 15. 

sGUARANTEE THAT NEXT TABLE IS ON WORD BOUNDARY. 

| 
| 


B4 
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GPR HANDLING ROUTINES FOR SUBROUTINE CALLS. 


.SBTTL GPR HANDLING ROUTINES FOR SUBROUTINE CALLS. 


FPSOHSSHSHESHSEEHHESEHASEHEHOESEHESSEEASHOEEEEESESESEEEEEEEEEEEEESEEEEEEEKEEEOEEEEE 


THERE ARE 4 ROUTINES AND MACRO DEFINITIONS USED FOR THE HANDLING OF 
GPR VALUES DURING SUBROUTINE CALLS WITHIN THIS PROGRAM. THE FOUR 
ROUTINES/MACRO CALLS HAVE THE FOLLOWING NAMES: 


SAVE - ear DEFINITION USED AT THE BEGINNING OF A SUBROUTINE TO 
E THE GPR CONTENTS FOR LATER RESTORATION. 
PASS - MACRO DEFINITION USED AT THE END OF A SUBROUTINE TO RESTORE 
THE PREVIOUSLY SAVED GPR CONTENTS AND TO LEAVE THE CONTENTS 
OF THE SPECIFIED GPRC(S) INTACT (NOT RESTORED). 
PREGOS - SUBROUTINE WHICH IS CALLED FROM THE SAVE AND PASS MACRO 
EXPANSIONS WHICH ACTUALLY PERFORMS THE ACTIONS ON THE GPRS. 


DURING A SUBROUTINE WHICH USES THESE GPR SAVE ROUTINES THE VALUES 
OF THE GPRS ARE STORED ON THE STACK IN THE FOLLOWING STACK FRAME: 


SP -> RET PC INTO PREGOS ROUTINE. 

SP+2 -> GPR RO CONTENTS. 

SP+4 -> GPR Ri CONTENTS. 

SP+6 -> GPR R2 CONTENTS. 

SP+6 -> GPR R3 CONTENTS. 

SP+10 -> GPR R4 CONTENTS. 

SP+*12 -> GPR RS CONTENTS. 

SP+14 -> RET PC INTO CALLER OF SUB‘ TNE WHICH CALLED PREGOS. 


EACH LEVEL OF SUB’ TNE CALLING USES 8 WORDS OF STACK OVERHEAD. 

THE SAVE AND PASS MACROS CAN ALSO BE USED IN “STRAIGHT LINE CODE” 
TO SAVE AND RESTORE THE GPR VALUES. IN ANY CASE, AFTER THE 
ISSUING OF A PASS CALL THE GPRS WILL BE RESTORED TO THE VALUES 
THEY HAD PRIOR TO THE LAST SAVE CALL (EXCEPT FOR THE EXCEPTED, 

OR PASSED INTACT, GPRS SPECIFIED AS PARAMETERS TO THE PASS CALL) 
AND THE SP WILL ALSO BE RESTORED TO ITS a gh he BEFORE THE LAST 
SAVE CALL. THE PROGRAMMER MUST BE SURE THAT THE SP HAS THE SAME 
VALUE WHEN THE PASS re IS CALLED AS IT MAAD IMMEDIATELY AFTER 
THE SAVE MACRO WAS CALLED 


PTT TTT TTT TT TTT TTT TTT TT TTT TT TTT TT TUTTLE TTTT TTT TT TTTTT TTT TT TTT TETT TTT TTT TTT TTT 


SEN 40 


} 
ce SS a ES 


C4 
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GPR FRAME ACCESS EQUATES 


.SBTTL GPR FRAME ACCESS EQUATES 


eee 


sEQUATES THAT ALLOW ACCESS TO THE STACK FRAME, THESE ARE THE 
sOFFSETS INTO THE STACK FOR REGISTERS SAVED DURING THE PREGOS 


sROUTINE. 

,eee 

LPCSLT== 36 
PCSLOT== 16 
RSSLOT== 14 
R4SLOT== 12 
R3SLOT== ' 10 
R2SLOT== 6 
R1iSLOT== 4 
ROSLOT*= 2 


LAST RETURN PC. 
RETURN PC. 


SEQ 41 


D4 
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-SBTTL GLOBAL MACRO DEFINITION - SAVE - 

J PSEAAKAEHEHEHSSEEEESASAGEEEEHEEESEOREREEEEEEEESESEEEEEEEEEEEAEEEEEEEEEEEOEEAEEOEEE 
34 THIS MACRO IS USED AT THE BEGINNING OF A SUBROUTINE TO SAVE THE 

+4 CONTENTS OF THE GPRS RO THRU RS. 

34 

3* INPUTS: SP - UNCHANGED SINCE SUBROUTINE WAS ENTERED 

34 RSSLOT - OFFSET TO STACK SLOT FOR RS CEQUATED TO 14 OCTAL) 

3% 

3* OUTPUTS: GPR SAVE AREA ON THE STACK IS LOADED WITH THE CONTENTS OF GPRS 
34 TOP OF STACK - LOADED WITH THE RETURN ADDRESS INTO PREGOS 

34 


3# CALLING SEQUENCE: SAVE 


s 
3 COMMENTS: NO ARGUMENTS ARE ALLOWED. 
3¢ THE PASS MACRO SHOULD BE CALLED TO RESTORE THE GPR VALUES. 


34 
3 SUBORDINATE ROUTINES CALLED: PREGOS. . 
J SSOSSSAHESHESSESSSSSEHESESSEESEEEEESEEESEBREEESEASEEEEEESEEEEEESLESEEEEEEESEEHEEEEEE 


-MACRO SAVE 

, JSR RS, PREGOS ;CALL REGISTER SAVE SUBRT. 
.NLIST 

“ENOM SAVE 


SEQ 42 


E4 
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GLOBAL MACRO DEFINITION PASS 

1743 -SBTTL GLOBAL MACRO DEFINITION - PASS - 
1744 FPSAAHHESEHAEAAAASASAADASEESADEESSEEEEEEASEEEAARERELASESASEEEEEEESEEEEEEESEEEEEEES 
1745 34 THIS MACRO IS USED IN CONJUNCTION WITH THE SAVE MACRO. IT IS 
1746 +4 CALLED AT ENO OF A SUBROUTINE TO PASS PARAMETERS IN GPRS BACK TO THE 
1747 +4 CALLING ROUTINE BY ALTERING THE GPR SAVE AREA ON THE STACK AND THEN 
fee 34 RETURNING TO PREGOS TO RESTORE THE GPRS TO THEIR SAVED VALUES. 
174 34 
1750 3@ INPUTS: ONLY ALLOWED ARGUMENTS ARE “RO” THRU “RS”. 
1751 34 ROSLOT THRU RSSLOT MUST BE EQUATED TO THEIR RESPECTIVE GPR SAVE 
ees | :¢ SLOT OFFSETS BEFORE CALLING THIS MACRO. 
1 3% 
as 3@ OUTPUTS: THE GPR VALUES ARE PUT IN THEIR RESPECTIVE SLOTS ON THE STACK. 
1 34 
rie 3@ CALLING SEQUENCE: PASS RO,R1,... 

3% 
1758 :@ COMMENTS: ANY COMBINATION OF GPR ARGUMENTS MAY BE LISTED IN ANY ORDER. 
1759 34 FOR cma THE FOLLOWING ARE LEGAL: 
1760 :¢ PASS R1 
1761 36 PASS R4,RCO,R2 
1762 34 THE GPRS LISTED AS ARGUMENTS WILL BE PASSED INTACT TO THE 
1763 ie CALLING ROUTINE, ALL OTHER GPRS WILL BE RESTORED. 
i. 34 THE SP MUST BE AT ITS ORIGINAL VALUE WHEN PASS IS CALLED. 

3% 
1766 74 THE one | CALL 
1767 36 PASS - RO,R3 
1768 34 EXPANDS INTO THE FOLLOWING ASSEMBLY CODE: 
1769 34 MOV RO,ROSLOT(SP) sPUT RO IN STACK SLOT. 
1770 7) MOV R3,RSSLOTCSP) sPUT R3 IN STACK SLOT. 
1771 34 JSR PC, @CSP)-+ sRETURN TO PREGOS SUBRT. 
1772 34 IN THIS EXAMPLE GPRS R1, R2, R4, AND RS WILL BE RESTORED TO 
1773 34 THEIR VALUES CONTAINED IN THE STACK FRAME AND RO AND R3 
77 34 WILL BE LEFT AT THEIR VALUES PRIOR TO THIS PASS CALL. 

34% 
1776 3@ SUBORDINATE ROUTINES CALLED: (PREGRT - LABEL WITHIN PREGOS, VALUE ON STACK.) 
ph FFSSSHSSHSSSSSSEHSASHSSSHSHHSSESHSHESESESEHEHEEEEEAAESEAEEEHAESEEEHEKEESEAEESEEEEEEEE 
1778 
1779 -MACRO PASS A,B.C,.0.E,F 
1780 “IRP x,<A .8.C,0.€.F> 
1781 IF NB, x 
1782 “LIST 
1783 MOV X,X*SLOTCSP) sPUT X IN STACK SLOT. 
1784 -NLIST 
1785 - ENOC 
17866 .ENDM 
1787 -LIST 
1788 JSR PC, @C(SP)+ sRETURN TO PREGOS SUBRT. 
1789 -NLIST 
1790 -ENOM PASS 

' 


000014 


F4 
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GLOBAL SUBROUTINE REGOS - 


-SBTTL GLOBAL SUBROUTINE - PREGOS - 

LS FHSARAARAESEHEHASSASCALESEEASEEESAEELEEEAEEEEALEEEEEEEAEEEEEASESEEEEAEEESEHRESEEEEEESD 
34 PRESERVE REGISTERS RO THROUGH RS FOR SUBROUTINE CALLS. 

34 

3* INPUTS: THE RETURN ADDRESS BACK INTO THE CALLING ROUTINE MUST BE IN 
34 GPR RS. (I.E.- MACROS USE "JSR RS,PREGOS”.) 

34 

3# OUTPUTS: REGISTERS RO THROUGH RS ARE SAVED ON THE STACK. 

3 

;#CALLING SEQUENCE: MACRO EXPANSION CALLS PREGOS. 

i* SUBROUTINE cove}... 

34 sMACRO EXPANSION RECALLS PREGOS. 

34 

3 COMMENTS: THIS ROUTINE IS RE-ENTRANT. 

34 

34 PARAMETERS MAY BE PASSED OUT OF A SUBROUTINE BY MODIFYING THE 
3* REGISTER SAVE AREA ON THE STACK. USE THE PASS GPRN MACRO 

3¢ TO RETURN GPR VALUES INTACT. 

34 USE THE RNSLOT OFFSETS FROM THE SP TO PASS OTHER PARAMETERS. 
34 (EXAMPLE : MOV VALUE ,ROSLOT( SP) 

34 MAKE SURE THE SP IS AT ITS ORIGINAL VALUE WHEN YOU DO THIS. 
& 


| @SUBORDINATE ROUTINES CALLED: NONE. 


FSSSEASESHSSASHESSSHASEHEASSHHOSASASHESESEASESESEESESESEEEESEEEEESESEEEEEREEEEEEEEE 


PPREGOS: 


see 


sRS HAS BEEN — ON THE STACK BY THE SUBROUTINE CALL 


R4,-CSP) 3SA VE R 
R3,-CSP) 3 SAVE RS 
R2,-CSP) sSAVE R2 
R1,-CSP) sSAVE R1 
»-(SP) 3s SAVE 
RS, -CSP) sPUSH RETURN PC ON TOP OF STACK 
RSSLOT(SP),.RS sRESTORE RS TO VALUE IT HAD BEFORE CALLS 
PC, @(SP)-« sCALL THE SUBROUTINE AT THE RETURN ADORESS 


sFROM THE PREGOS CALL, PUTTING THE PRESENT 
sPC ON THE STACK AS A RETURN ADDRESS INTO 
sTHIS (PREGOS) ROUTINE. 


THE FOLLOWING CODE IS EXECUTED WHEN THE CALLING ROUTINE DOES A 
s“RETURN” [JSR PC,@CSP)+] USING THE PC DEPOSITED ON THE STACK ABOVE. 


: a 
PREGRT:: MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTS 


(SP)+,RS sPUT RETURN PC IN RS. 
(SP)+, sRESTORE RO. 
(SP)+,R1 sRESTORE Ri. 
(SP)+,R2 sRESTORE Re. 
C(SP)+,R3 sRESTORE RS. 
CSP)+,R4 sRESTORE R4. 


RS sRETURN TO THE SUBROUTINE WHICH CALLED PREGOS. 
sRESTORING RS IN THE PROCESS. 
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GLOBAL TEXT SECTION 


T3/ 


1876 
1877 
1884 


oss 


110 
061 


125 
061 


G4 


.SBTTL GLOBAL TEXT SECTION 
sidsaad 


6 

. 

j FVTSKL1.P11 

3 
{TILAGAACASSASAASSASGSASSSGSGAASS SSS GLASS IAS SISASAAS SAAS SASASSASKTAASTATKASAS EAA SCESS 


3¢¢ 

: THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
s MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 

3 MORE THAN ONE TEST. 

ge 


3 
3; NAMES OF DEVICES SUPPORTED BY PROGRAM 
3 

DEVTYP <DHU-11> 


LSOVTYP:: 
-ASCIZ /DHU-11/ 


-EVEN 


; TEST DESCRIPTION 


3 
DESCRIPT <DHU-11 FUNC TST PART3> 
L$DESC:: 
-ASCIZ /DHU-11 FUNC TST PAR 


- EVEN 
EVEN 


H4 
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GLOBAL TEXT SECTION 


1886 
1887 js SUSCLICASSSESASGSSSA SAGA SA SSGHADAISARSSSAASAAGSSSS GSAS SAG SHSKGG LAS SHASLSTSGHSHSKGSSECSHSDASEES 


; 
1896 s FORMAT STATEMENTS USED IN PRINT CALLS 


F 
1889 ; FVTA.FMT | 
1890 3 
1891 , SEASACAASAAA ASA A AAA Ae SSDS AAS MSAASKARABSGASSSIGAASSLSSSAGBASASEABSASEAASASSSAS 
1897 Fy 


1970 010216 
1971 010264 
1972 010361 
1973 010420 
1974 010514 
1975 010570 


-NLIST BIN 


I4 ' 
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GLOBAL TEXT SECTION 


3 FVTC.MSG 


pESSASAS MSA BAHASA SKCSSSISKSSSLSGSSKAAISA SHA SLSSMG SAGAS ADS SEK ASSSAASSACATSASSSS SAAS SSAA S SSS 


-SBTTL GLOBAL MESSAGE AREA 
3 seeeeesee FORMAT STATEMENTS seeeeeeaee 


MFUNIT:: .ASCIZ 


ASCIZ 


g 
& 
f 


/@NSA TESTING UNIT :8D48N/ 
/8TEN/ 
/$A TSA, TEST ABORTED SN/ 
fA ACTUAL DATA:  #s068A (0).SN/ 
ecanaan Orth) an SS TEST SUCCESSFUL, BITS 0 TO sD2sA (D) TESTED/ 
\SA FRAMING/PARITY ERROR DETECTION AND REPORTING BAD ON LINES: sD2sA 
/$A CHAR RECEIVED WITH FRAMING ERROR BIT STA, SHOULD BE STSN/ 
/@A CHAR RECEIVED WITH PARITY ERROR BIT ST#A, SHOULD BE sSTSN/ 
/6TSA ON LINE SD2KA IMAL .sN/ 
= UNEXPECTED TSA FOUND IN RECEIVE CHAR FIFO:sN/ 
CODE IS ASSOCIATED WITH LINE: sD2sN/ 
CODE IS: s036N/ 
/@R STSA VALUE: SO3SN/ 
STSA VALUE: NONESN/ 
SA S020N/ 


sT 
/@A CHARACTER RECEIVED WITH ERROR FLAGCS) SET ON LINE sD2sN/ 


: SD2SN\ 


IZ /#A CHARACTER READ AS: 


#0 
0A STSA ERROR FLAG SET. SN/ 


IZ /#A NUMBER OF ERRORS DETECTED ON LINE #D2sA IS SDSSN/ 


/SA LINESD2SA ONLY STSDSSA BYTES OF SDSHA BYTE/ 
/ DATA PAT‘N TX'D FROM LINESD2SN/ 
4A DATA PATTERN NOT COMPLETELY STSN/ 


/8A STSA SO6EN/ 

a TOO FEW TX.ACTIONS GENERATED ON LINE sD2sN/ 

saa ERROR CONDITION ON LINE sD2sN/ 

/GA STED26A, BMP CODE REPORTED :s030N/ 

/@A_ OVERFLOW OCCURRED (MORE THAN 31 BMP CODES FOUND IN QUEUE )sN/ 

/8058A_IS NOT A SUPPORTED BAUDRATE, ENTER ANOTHER OR CTRL C.sN/ 
STATUS SIGNAL REPORT :sN/ 

88 @8D28A; OSR°SB1SA, RI-sBisA, DCD=-sB18A, CTS=s81sN/ 
LOOPBACK TEST STATUS — : 7 


/BAMODEM L 
IZ /PATTERN @8058A (0) COMPLETED. SN/ 


goeeesseseses MES 


SAGE AREA sesesesessese 
/OEVICE REGISTER ACCESS ERRORS/ 


EM0103:: .ASCIZ 

EmM0SO9:: .ASCIZ /SET/ 

EM1601:: .ASCIZ /TIMEOUT OCCURRED WAITING FOR MASTER RESET TO CLEAR/ 

EmM4401:: .ASCIZ /DMA ADDRESS TEST FAILED/ 

EM4402:: .ASCIZ /NO SUITABLE ADOR FOUND, TEST ABANDONED/ 

EM4403:: .ASCIZ /eeHOST FAILUREss, WRITE FAILED TO AN ADOR WHICH HAD BEEN READ/ 
EM4404:: .ASCIZ /NO ACTIVE LINES, TEST ABANDONED/ 

EM4405:: .ASCIZ /DMA_START BIT FOUND SET BEFORE DMA INITIATED, TEST ABANDONED/ 
EM4406:: .ASCIZ /TIME-OUT OCCCURED WAITING FOR DMA TO FINISH/ 


oc 
/TOO FEW CHARACTERS FOUND IN THE RXFIFO,DMA FAILED/ 


DOHU-11 kokaae at VERIFICATION 
GLOBAL MESSAGE AREA 


013531 


iu 


EM9011:: 


“ASCIZ 


J4 
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7TOO MANY BMP CODES FOUND IN RXFIFO/ 

/BAD BITS BETWEEN BITS 0 AND / 

/RXFIFO FAILED TO PURGE/ 

7*#eHOST FAILURE*esWRITE ATTEMPT FAILED/ 
/BMP CODE FOUND IN FIFO, TEST INVAILDATED/ 
Pt we ERROR TEST FAILED/ 


c 
IZ /RECEIVED CHAR MISCOMPARE AGAINST TX DATA ON LINE/ 


EXPECTED OR CORRECT/ 
ACTUAL OR MEASURED / 
/OVERRUN/ 


/FRAMING/ 

/PARITY/ 

/SUMMARY REPORTS FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS: / 
/TRANSMITTED/ 


IZ /RECV'D/ 


FIFO WILL NOT PURGE (DATA.VALID STUCK SET),/ 
/ REMAINDER OF TEST SKIPPED. / 


IZ a ny TWICE THE Y aaatariiees NUMBER OF CHARACTERS RECEIVED. / 


ASCIZ / 


LPR CONTENTS: 
IZ /EXTRA CHAR RECEIVED “WITHIN DATA PATTERN ON LINE/ 


/SINGLE CHAR MISSING FROM RECEIVED DATA ON LINE/ 
/#A_ (NO TX COMPLETION INTERRUPTS RECEIVED )sN/ 
/OMA TRANSMISSION MODE TEST FAILED/ 

/OMA_START BIT SET AFTER RESET OR TX.ACTION ON LINE(S):/ 
/ UNEXPECTED DATA FOUND IN FIFO FROM LINE: / 
/SPLIT SPEED TEST FAILED/ 

/OrP CODES WERE REPORTED DURING THIS DIAGNOSTIC/ 
/6MP CODE FOUND IN TEST / 

/THE LAST BMP CODE WAS FOUND IN TEST 

/UNEXPECTED BMP CODES FOUND DURING THs ~—— 
/KEYBOARD ECHO (DHU REMOTE LOOPBACK) TEST 


/MODEM BAUDRATE IN BPS:/ 
/TYPE <CR> WHEN MODEM LINK ESTABLI 


SHED: / 
IZ /EXIT THE TEST (N = LOOP BACK TO SEND MORE DAT 
/NIMBER OF 


A):/ 
256 BYTE PATTERNS TO SEND ON EACH SELECTED LINE/ 


IZ <15><12>/ (1-255, O=SEND UNTIL tC):/ 


/PRINT MODEM STATUS SIGNAL REPORT AFTER EACH PATTERN: / 
/TYPE <CR> TO TERMINATE THE TEST: / 


-LIST BIN 


GLOBAL MESSAGE AREA 


IK4 : 


; FVTSKL2.P11 
 SUSSCHSKSACLAHASGSGSSGASSCGSLSGSSSSHSSSMSSATT LISS SAAS AAAS ASS SAAS GSSASSSASASLSATAAAA ORES 


-SBTTL GLOBAL ERROR REPORT SECTION 


gee 

s THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 

s USED BY MORE THAN ONE TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTB 
s (BASIC) AND PRINTX CEXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 

gee 


| 
| 
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GLOBAL. ERROR REPORTING ROUTINE 


013572 
013572 
013572 
013572 


013576 
013606 


013710 
000001 


L4 


SEQ 50 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - EROIO1 - 
{SRA ASASARARASASESSALASAREEEESEERABEEEEEDEEREEEAEEAEAEEEEEEEEEEEEEEEEEEEREEES 
34 THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
3% INFORMATION IF AN ERROR IS DETECTED IN TEST 1 CREGISTER ADDRESS 
3* ACCESS TEST). IF THE “EXTENDED ERROR INFO” OPTION HAS BEEN SELECTED 
3% THEN THIS SUBROUTINE WILL REPORT THE TYPE OF ACCESS CREAD OR WRITE OR 
34 BOTH) WHICH CAUSED A BUS TIME-OUT TRAP (004 TRAP).A MESSAGE INDICATING 
34 THAT THE DHU MAY BE AT THE WRONG UNIBUS ADDRESS IS ALSO PRINTED. 
34% 
3 INPUTS: RS - ERROR FLAG WORD. 
3% IF BIT O IS SET, A READ ERROR OCCURED. 
34 IF BIT 1 IS SET, A WRITE ERROR OCCURED. 
3* 
3# OUTPUTS: MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE. 
34 
3@ CALLING SEQUENCE: yas | THE LABEL “ERO101” AS THE MESSAGE — 
34 ARAMETER IN THE ORS ERROR REPORT MACRO CALL 
3% 
3# COMMENTS: 


34 
3# SUBORDINATE ROUTINES USED: NONE. 


FS SSSAAEHHASASHASHEEEEEASESERESEARSESAASALEASOEEESEAREAAESEEESERAEEEEEESEEAEEEESEEEEEESD 


BGNMSG ERO101 


ERO101:: 
SAVE sSAVE THE GPR CONTENT 
JSR RS ,PREGOS :CALL REGISTER SAVE SUBRT. 
MOV @BITO6 RO sSET-UP THE BIT MAP FOR ‘REPORT EXT’'D ERROR INFO’ 
BIC OPTION,RO sTRY AND CLEAR THE FLAG. 
BNE 6% sEXIT IF OPTION NOT SELECTED. 
3¢ 
s REPORT EXTENDED ERROR INFOMATION 
od 
BIT @BITO,RS sTEST FOR READ ERROR. 
BEQ 2s sSKIP READ ERROR MSG IF NO READ ERROR. 
PRINTB @MSG1 sPRINT READ ERROR MESSAGE. 
MOV @MSG1, -CSP) 
MOV #1,-CSP) 
MOV SP ,RO 
TRAP CSPNTB 
ADD @4,SP 
2s; BIT oBIT1,R5 sTEST FOR WRITE ERROR. 
BEQ 4% sSKIP WRITE ERROR MSG IF NO WRITE ERROR. 
PRINTB @MSG2 sPRINT WRITE ERROR MESSAGE. 


4%: PRINTX @MSG3 


ea ee ee eee ee 
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GLOBAL ERROR REPORTING ROUTINE 


2083 


2087 


2089 
2090 


013704 
013704 
013706 
013706 
013706 


013710 
013713 


101 102 
123 04 
111 115 
oss 117 
124 040 
122 101 
040 103 
125 123 
104 040 
131 040 
105 101 
040 101 
124 105 
120 124 
045 116 
101 102 
123 04 
111 115 
117 
124 040 
122 101 
040 103 
125 123 
104 040 
131 040 
122 111 
105 040 
124 124 
115 120 
056 045 
000 
101 104 
040 
101 131 
102 105 
101 124 
124 110 
040 12 
117 116 
040 125 
111 102 
123 
104 104 
105 123 
056 045 
045 116 


M4 


SEQ 51 


6$: PASS sRESTORE THE GPR CONTENTS. 
JSR PC,@CSP)+ sRETURN TO PREGOS SUBRT. 
ENDMSG 
L10002: 
TRAP C$MSG 
MSG1:: .ASCIZ /#ABUS TIME-OUT TRAP CAUSED BY READ ATTEMPT. sN/ 


MSG2:: .ASCIZ /#ABUS TIME-OUT TRAP CAUSED BY WRITE ATTEMPT .sN/ 


MSG3:: .ASCIZ /s#ADHU MAY BE AT THE WRONG UNIBUS ADDRESS. sNsN/ 


EVEN 


N4 
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GLOBAL ERROR REPORTING ROUTINE EROSOS - 
2092 -SBTTL GLOBAL ERROR REPORTING ROUTINE - EROSOS - 
2093 {SRAAARARAARARARAKAAEEEARAEARAARERARABLARERARARESEAAREEAEEEARABAREREAEAEEEEEREERDEES 
2094 3% THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS AN ADDITIONAL ERROR 
2095 3* MESSAGE WHOSE ADDRESS IS PASSED AS AN INPUT PARAMETER, PROVIDED 
sor 3% EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 
7% 
he 3* INPUTS: R1 - ADDRESS OF THE MESSAGE TO PRINT. 
3% 
See 3* OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 
101 3% 
2102 3* CALLING SEQUENCE: LOAD THE ADDRESS OF THE MESSAGE IN R1. 
2103 3% INCLUDE THE LABEL “EROSO3” AS THE MESSAGE POINTER 
04 3% PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
3% 
ty 3* COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 
3% 
2108 ;* SUBORDINATE ROUTINES USED: NONE. 
2109 FSRAAARARERSEASEAEAEEHEARARARERAREREEEARESEREAEEAAEAREAREREEEEESEOEOEOOE4E4EEEEESE 
2110 
2111 014124 BGNMSG EROSO3 
_— 014124 EROSOS: : 
2113 014124 012700 000100 MOV #BITO6,RO sTRY TO CLEAR THE 
2114 014130 046700 166026 BIC OPTION,RO ;EXT'D ERROR REPORTING FLAG 
She 014134 001011 BNE 2s sEXIT IF FLAG NOT SET. 
2117 
2118 0141356 PRINTB #EFOSO3,R1 sPRINT THE MESSAGE. 
014136 010146 MOV R1,-CSP 
014140 012746 005453 MOV @EF 0503, -( SP) 
014144 012746 000002 MOV #2,-C 
014150 010600 MOV SP, 
014152 104414 TRAP CSPNTB 
210 014154 062706 000006 ADD 06, 
2120 014160 2s: ENDMSG 
014160 L10003: 
014160 104423 


BS 
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GLOBAL ERROR REPORTING ROUTINE ER16035 


2122 


014162 
214162 
014162 
014162 


014166 
014172 
014176 


171072 


005460 
000002 


000006 


-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER1603 - 

IOROOOREHECOEED LEO OEREOEEDEEEOOEEEDEEEEDEEEEEEEEEEEEEEEEEESEEEEEEESESEOOEEEEEEE 
THIS ERROR REPORTING ROUTINE IS USED TO PRINT OUT A BASIC ERROR 
MESSAGE, ALONG WITH A MESSAGE INFORMING THE OPERATOR WHICH TEST IS 
ABOUT TO BE ABORTED, ee EXTENDED ERROR INFOMATION HAS BEEN 
REQUESTED, OTHERWISE ONLY A "TEST FAILURE” MESSAGE WILL BE PRINTED. 


i 
3# OUTPUTS: 


R1_ - CONTAINS THE ADDRESS OF THE MESSAGE TO BE PRINTED. 


ERRMSG - CONTAINS THE ADORESS OF THE MESSAGE THAT INDICATES 
THE TEST THAT IS BEING PERFORMED, EG DMA, BREAK ETC. 


MESSAGES ARE PRINTED AT THE OPERATORS CONSOLE. 


“TESTNAME TEST ABORTED” 
3¢ 
3@ CALLING SEQUENCE: 


3¢ 
3@ COMMENTS: 


34 


INCLUDE THE LABLE “ER1603” AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 


34 
3@ SUBORDINATE ROUTINES CALLED: NONE. 


FSSSEOSSSEHHSESASSESEASAESASSEESEEEHESEHEEEEEEEEEEEDESEEEEEEEEEEESEEEEEEEEEEEEED 


2s: 


BGNMSG ER1603 
SAVE 


MOV @BITO6 


ER1603:: 
sSAVE THE CONTENTS OF THE GPRS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


»RO sTRY TO CLEAR THE 
BIC OPTION,RO 


sEXT'D ERROR REPORTING FLAG 


BNE 2 sEXIT IF FLAG NOT SET. 
PRINTB @€F0SO3,R1 :PRINT BASIC MESSAGE ON OPERATORS S CONSOLE. os 
MOV F0503, -(SP) 
MOV #2. -(SP) 
MOV SP. 
TRAP  CS$PNTB 
ADD rs 
MOV ERRMSG, R2 :GET THE “TEST MESSAGE”. 
PRINTB @€F1601,R2 sPRINT “TEST ABORTED” MESSAGE. sha ig: 
MOV @€F 1601, -( SP) 
MOV @2,-C 
MOV SP. 
TRAP CSPNTB 
ADO €6,SP 
PASS sRESTORE THE CONTENTS OF THE GPRS. 
ecial JSR PC, a(SP)+ ;RETURN TO PREGOS SUBRT. 


L10004; 


CS 


OHU-11 FUNCTIONAL VERIFICATION MACRO M1200 12-DEC-83 16:16 PAGE 40 SEQ 54 
GLOBAL ERROR REPORTING ROUTINE ER6201 - 
2160 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER6201 - 
2161 FPSSHAAHHAHHSSHSHHASESEHASASEEEEAAESEAEEEEEEASESEESEEESESEEEDEEEEEEEEEEEEEEEEHOEEEEE 
2162 36 THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS INTENDED FOR USE IN THE 
2163 34 FRAMING ERROR AND PARITY ERROR TESTS. IT REPORTS ERROR INFORMATION 
2164 34 WHEN A CHARACTER HAS BEEN READ FROM THE DUT WITH THE INCORRECT 
2165 3¢ COMBINATION OF FRAMING AND PARITY ERROR BITS. "HESE ERRORS ARE REPORTED 
tes: :¢ ONLY IF EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 
3¢ 
2168 3@ INPUTS: R2 - DATA BYTE READ FROM THE DUT, INCLUDING ERROR FLAGS. 
2169 36 R3 - LINE NUMBER MULTIPLIED 6/¢ 2. 
2170 34 RS - MESSAGE FLAGS, WHICH MESSAGES TO REPORT. 
2171 16 BIT1 AND BITS - INDICATE WHICH MESSAGES ARE TO BE 
2172 34 RE? ORTED, FRAMING OR PARITY RESPECTIVELY. 
2173 3¢ 8170 AND BIT 2 - “SET”/"CLEAR” MESSAGE FOR 
thes ;6 FRAMING AND PARITY ERRORS BITS. 
3% 
Suy? 3@ OUTPUTS: MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE. 
7¢ 
2178 3@ CALLING SEQUENCE: INCLUDE THE LABEL “ER6201” AS THE MESSAGE POINTER 
ety 34 PARAMETER IN THE DIAG SUPER ERROR REPOR: MACRO CALL. 
34 
2181 3@ COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
2182 3¢ THE CONTENTS OF THE INDIRECT ADORESS REGISTER FIELD OF THE DUT 
opty 34 CSR MAY BE ALTERED. 
34 
2185 3@ SUBORDINATE ROUTINES USED: PRTLPR. 
2186 SSSSSHSSSSESESHASSHHSSSEHSHAHESEEHHHSSESSHSSESEEEESEASESESESEHESEEEESEEEEEEEEEEEEEEEE 
2187 
2188 014254 BGNMSG ER6201 
14254 ER6201:: 
2189 014254 SAVE sSAVE THE CONTENTS OF THE GPR‘S. 
2190 14254 004567 171044 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
2191 4° 
oo s EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 
2194 014260 032767 000100 165674 BIT @BITO6 ,OPTION sEXIT WITH TEST FAILURE MESSAGE IF 
2195 014266 001507 BEQ 60% sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
th sOURING THE SOFTWARE QUESTIONS. 
21986 014270 016304 005234 MOV TXRXLBCR3),R4 sGET THE ASSOCIATED TX LINE NUMBER. 
2199 014274 006203 ASR R3 sCALCULATE THE RX LINE NUMBER. 
014276 006204 ASR R4 sCALCULATE THE ASSOCTATED LINE NUMBER. 
2201 014300 PRINTB #€F6201,R3,R4 sREPORT THE ERROR TYPE AND LINE NUMBERS. 
014300 010446 MOV R4,-CSP) 
014302 010346 MOV R3, -CSP 
014304 012746 005671 MOV @€F 6201, -CSP) 
014310 012746 000003 MOV @3,-(SP) 
014314 010600 MOV SP, 
014316 104414 TRAP CSPNTB 
osee 014320 062706 000010 ADD #10,SP 
s° 
ety s REPORT FRAMING ERROR PROBLEM. 
t- 
2205 014324 012704 011151 MOV @EM6202 ,R4 sSELECT THE “ERROR BIT CLEAR” MESSAGE. 
2206 014330 012701 010077 MOV @EMO0509 ,R1 sSELECT EXPECTED “ERROR BIT SET” MESSAGE. 
2207 014334 032705 000002 BIT *BITi, R5 sTEST IF FRAMING ERROR MESSAGE TO BE REPORTED. 


D5 
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GLOBAL ERROR REPORTING ROUTINE ER6201 - 

2208 014340 001427 BEQ 6$ sBRANCH TO REPORT PARITY ERROR. 

2209 014342 032705 000001 BIT oBITO,RS sTEST “ERROR BIT SET/CLEAR” MESSAGE FLAG. 

2210 014346 001403 BEQ es sBRANCH TO REPORT ERROR BIT “CLEAR”. 

2211 014350 010401 MOV R4,R1 sSELECT EXPECTED “CLEAR” STATE MESSAGE. 

2212 014352 012704 010077 MOV @EM0509 ,R4 sSELECT THE “ERROR BIT SET” MESSAGE. 

2213 014356 2s: PRINTX @EF6202,R4,R1 ;REPORT THE: SOURCE OF THE PROBLEM. 
014356 010146 MOV R1,-CSP) 
014360 010446 MOV R4,-CSP) 
014362 012746 006004 MOV #€F 6202, -( SP) 
014366 012746 000003 MOV 03, -CSP) 
014372 010600 MOV SP ,RO 
014374 104415 TRAP CSPNTX 
014376 062706 000010 ADO #10,SP 

2214 014402 032705 000010 BIT @BIT3,RS sTEST IF PARITY ERROR MESSAGE TO BE REPORTED. 

2215 014406 001424 BEQ 10% sEXIT IF PARITY ERROR REPORT TO BE SKIPPED. 

2216 014410 012704 011151 MOV @EM6202 ,R4 sSELECT THE “CLEAR” MESSAGE. 

tH 014414 012701 010077 MOV @€M0509,R1 sSELECT THE EXPECTED “SET” STATE MESSAGE. 

3*¢ 

2219 s REPORT PARITY ERROR PROBLEM. 

2221 J 

2222 014420 032705 000004 6%: BIT eBIT2,.RS sTEST “SET”/"CLEAR” MESSAGE ay 

2223 014424 0014035 BEQ 8% sBRANCH TO REPORT ERROR BIT CLEAR 

2224 014426 010401 MOV R4,R1 iSELECT THE EXPECTED “CLEAR” STATE MESSAGE. 

2225 014430 012704 010077 MOV #€M0509 ,R4 sSELECT THE “ERROR BIT SET” MESSAGE. 

2226 014434 8%: PRINTX @€F6203,R4,R1 ;REPORT THE SOURCE OF THE PROBLEM. 
014434 010146 MOV R1,-CSP) 
014436 010446 MOV R4,-CSP) 
014440 012746 006102 MOV #€F6203, -(SP) 
014444 012746 000003 MOV @3,-(SP) 
014450 010600 MOV SP ,RO 
014452 104415 TRAP CSPNTX 

— 014454 062706 000010 ADD #10,SP 

2228 014460 10%: PRINTX @€F1603,R2 sREPORT ACTUAL DATA RECEIVED. 
014460 010246 MOV R2,-CSP) 
014462 012746 005512 MOV €F 1603, -( SP) 
014466 012746 000002 MOV #2,-CSP) 
014472 010600 MOV SP RO 
014474 104415 TRAP CSPNTX 

2220 014476 062706 000006 ADO ° 

2230 014502 004767 006152 JSR PC,PRTLPR sREPORT THE CONTENTS OF THE LPR FOR THIS LINE. 

2231 014506 608%: PASS sRESTORE THE CONTENTS OF THE GPR'S. 
014506 004736 JSR PC,@(SP)+ sRETURN TO PREGOS SUBRT. 

2232 014510 ) ENOMSG 


014510 L10005: 
014510 104423 TRAP CsMSG 
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GLOBAL ERROR REPORTING ROUTINE 


2234 
2235 
2236 
2237 
2238 
2239 
2240 
2241 


2267 


014512 
014512 


000100 165442 


E5 


oy 1 
SEQ 56 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9001 - 
FFSSAHHEASSHASSSASHESESEASOHASEEASERESEEESEEHEEEASEEAEESEEEHEEEEEEEESEEEEEEEEEEEEEESE 
34 THIS IS AN ERROR REPORTING SUBROUTINE WHICH REPORTS AN UNEXPECTED 
3¢ CODE WHICH HAS BEEN FOUND IN THE DUT CSR. THIS CODE CAN BE A BMP 
3¢ CODE, A SELF-TEST CODE, OR A MODEM STATUS CODE. 
3% 
3* INPUTS: R1 - ADDRESS OF MESSAGE TO PRINT FIRST. 
34 R2 - SINGLE BYTE CODE WHICH HAS BEEN READ FROM THE DUT. 
34 R4 - LINE NUMBER ASSOCIATED WITH THE CODE. 
34 
3@ OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 
34 
3@ CALLING SEQUENCE: INCLUDE THE LABEL "ER9001" AS THE MESSAGE POINTER 
34 PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
3% 
3@ COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
16 
3@ SUBORDINATE ROUTINES USED: NONE. 
FSSSASHHASSSSSSHASASHAASHEASAHASEEHASEEEEEEEEEESEEEEEEEEEOEEEEEEEEEEEOEEEEEEEESEEE 
BGNMSG ER9001 
ER9001: : 
a¢ 
s EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 
BIT @BIT06 ,OPTION sEXIT WITH TEST FAILURE MESSAGE IF 
BEQ 2s 3NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
sOURING THE SOFTWARE QUESTIONS. 
PRINTB #€F9001,R1 sREPORT TYPE OF CODE FOUND. 
MOV R1, -€ ) 
MOV #€F 9001, -CSP) 
MOV 2. he 
MOV SP RO 
TRAP CSPNTB 
ADO #6 .SP 
PRINTX @#EF9002,R4 sREPORT THE LINE NUMBER OF THE CODE. 
MOV R4, -(SP) 
MOV #€F 9002, -( SP) 
MOV #2,-CSP) 
MOV SP RO 
TRAP CSPNTX 
ADD #6.,SP 
PRINTX @#€F9003,R2 sREPORT THE CODE WHICH WAS ——.. ) 
CSP) 
SP ,RO 


26: 





FS 
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GLOBAL ERROR REPORTING ROUTINE ER9002 - 


2303 


2304 
2306 


014612 
014612 


000100 165342 


177400 


006501 
000003 


000010 


011541 
006420 
000003 


000010 


011515 
006420 
000003 


SEQ 57 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9002 - 
J FMASSAHAKRASASASHAASEHASEHAESEHEAAEEAAAHEREEEEAEAEEEEEESEREHEEEEEREEAEEEEEEEEEES 
34 THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS INTENDED FOR USE IN THE 
34 TRANMSISSION AND RECEPTION TESTS. IT REPORTS THE TYPE OF ERROR WHICH 
34 HAS OCCURRED WHEN INCORRECT DATA IS RECEIVED FROM THE DUT. THIS 
34 ROUTINE ALSO REPORTS THE READ AND EXPECTED DATA VALUES. 
34 
3@ INPUTS R1 - ADDRESS OF MESSAGE TO PRINT FIRST. 
3¢ R2 - DATA BYTE READ FROM THE DUT. 
34 R3 - LINE NUMBER MULTIPLIED BY 2. 
34 R4 - EXPECTED DATA BYTE, BIT 15 SET IF “NONE”, 
12 
3* OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 
34 
3@ CALLING SEQUENCE: INCLUDE THE LABEL “ER9002” AS THE MESSAGE POINTER 
3¢ PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
34 
3* COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
3% 
3@ SUBORDINATE ROUTINES USED: PRTLPR. 
FSSSSHAASHSSSSSSSSSSHASEARSSSESSSESARASHEHEEAASEEEAESSEESEEESEEEEEEEEEEEEEEEEEEESREEEED 
BGNMSG ER9002 
ER9002: : 
3° 
s EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 
BIT @B81T06 ,OPTION sEXIT WITH TEST FAILURE MESSAGE IF 
BEQ 62% sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
sOURING THE SOFTWARE QUESTIONS. 
ASR R3 sCALCULATE THE LINE NUMBER. 
BIC #177400 ,R2 sMASK OUT ALL BUT DATA IN READ CHAR. 
PRINTB #€F9006,R1,R3 ;PRINT THE FIRST LINE OF THE MESSAGE. 
MOV R3,-CSP) 
MOV R1.-CSP) 
MOV @EF 9006, -C SP) 
MOV @3,-CSP) 
MOV SP RO 
TRAP CSPNTB 
ADO #10,SP 
PRINTX @€F9004,0EM9010,R2 sPRINT ACTUAL DATA. 
MOV R2,-CSP) 
MOV @€M9010, -C SP) 
MOV @€F 9004 , -( SP) 
MOV @3,-(SP) 
MOV SP RO 
TRAP CSPNTX 
ADO #10,SP 
TST R4 sCHECK FOR “NONE” CODE SET IN EXPECTED DATA. 
BMI es sBRANCH TO PRINT “NONE” MESSAGE IF FLAG SET. 
PRINTX @#€F 9004, 0EM9009,R4 sPRINT EXPECTED DATA, 
MOV R4,-CSP) 
MOV @EM9009, -C SP) 
MOV #EF 9004 , -C SP) 
MOV @3,-(SP) 


OHU-11 FUNCTIONAL VERIFICATION 
GLOBAL ERROR REPORTING ROUTINE 


2307 
2308 


2309 
2310 


014724 


000010 
011515 
006450 
000002 


000006 
005672 


GS 


| 
| 
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- ER9002 - 
MOV SP,RO 
TRAP CSPNTX 
ADD #10,SP 
BR 60 sEXIT THIS ROUTINE. 
2s: PRINTX eEF 9005, #EM9009 SPRINT MESSAGE INDICATING NO EXPECTED DATA. 
MOV 9EM9009, -( SP) 
MOV #€F 9005, -( SP) 
MOV @2,-C(SP) 
MOV SP ,RO 
ino CSPNTX 
60$: JSR PC,PRTLPR sPRINT CONTENTS OF THE LPR REGISTER. 
62%: ENOMSG 
10007: 
TRAP C$MSG 


H5 
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GLOBAL ERROR REPORTING ROUTINE ER9003 - 


014770 
014770 


014770 
014776 


000100 165164 


011565 
040000 


. SBTTL 


GLOBAL ERROR REPORTING ROUTINE - ER9OO3 - 


SEQ 59 


J PHHAHAASASHASASEASERAASAAAESA ILSKAHHAAAESEHASEAEEEEREEAEESEASEEEEEEEESEEESEEEEEEED 


i* SET (IE. OVER-RUN, FRAMING, OR PARITY FLAG). 

34 

3@ INPUTS: R2 - DATA BYTE READ FROM THE DUT, INCLUDING ERROR FLAGS. 
14 R3 - LINE NUMBER MULTIPLIED BY 2. 

7% 

s# OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 


s@ CALLING SEQUENCE: 


THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS INTENDED FOR USE 
TRANMSISSION AND RECEPTION TESTS. IT REPORTS ERROR INFORMATION 


IN THE 
WHEN 


A CHARACTER HAS BEEN READ FROM THE DUT WITH AN ERROR FLAG OR FLAGS 


INCLUDE THE LABEL “ER9003" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO C 


3¢ COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD OF THE DUT 


CSR MAY BE ALTERED. 


: 
3 SUBORDINATE ROUTINES USED: NONE. 


FSHSSEHASASASASSSSSESSASSEAESEHESHEEASESEEESEASEESEEESEASEEEEEEEEHEEEEEAEEEEEEDESD 


BGNMSG ER9003 
ER9003: : 


3¢ 
s; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 


| 
| 
| 
| 
) 
R3,-CSP) 
pe pe 


BIT @BITC6,OPTION ;EXIT WITH TEST FAILURE MESSAGE IF 
BEQ 62% sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
sDURING THE SOFTWARE QUESTIONS. 
ASR R3 sCALCULATE THE LINE NUMBER. 
PRINTS #€F9007,R3 sREPORT THE ERROR TYPE AND LINE — 
MOV 
MOV @2,-( 
MOV SP ,RO 
TRAP CSPNTB 
ADO @6,SP 
MOV R2,R1 sEXTRACT THE RECEIVED CHARACTER FROM THE 
BIC #177400,R1 s__PASSED IN CHAR VALUE WITH FLAGS. 
PRINTX #€F9008,R1 sREPORT THE VALUE OF THE RECEIVED CHAR. 
MOV R1,-CSP) 
MOV .- CSP) 
MOV #2. -(SP 
MOV RO 
TRAP CSPNTX 
ADD »SP 
s¢ 
s REPORT OVERRUN FLAG SET IF NECESSARY. 
ge 
MOV #€M9011,R1 sSELECT THE OVERRUN ERROR MESSAGE. 
BIT #61IT14,R2 sCHECK OVERRUN ERROR FLAG IN PASSED IN CHAR. 
BEQ 2s sSKIP ERROR IF OVERRUN ERROR FLAG WAS CLEAR. 
JSR PC, 508 sREPORT THE OVERRUN ERROR FLAG WAS SET. 





[5 
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GLOBAL ERROR REPORTING ROUTINE ER9003 - 
oct ; REPORT FRAMING FLAG SET IF NECESSARY. 
2358 015072 012701 011575 2s: MOV EM9012,R1 sSELECT THE FRAMING ERROR MESSAGE. 
2359 015076 032702 020000 BIT + elle R2 sCHECK FRAMING ERROR FLAG IN PASSED IN CHAR. 
2360 015102 001402 BEQ sSKIP ERROR IF FRAMING ERROR FLAG WAS CLEAR. 
ok 015104 004767 000020 JSR BC, 50% sREPORT THE FRAMING ERROR MESSAGE. 
3¢ 
oy ; REPORT PARITY FLAG SET IF NECESSARY. 
Shee 
2365 015110 012701 011605 4$: MOV #EM9013,R1 sSELECT THE PARITY ERROR MESSAGE. 
2366 015114 032702 010000 BIT #BIT12,R2 sCHECK PARITY ERROR FLAG IN PASSED IN CHAR. 
2367 015120 001415 BEQ 60% 3EXIT ROUTINE IF PARITY ERRO FLAG WAS CLEAR. 
2368 015122 004767 000002 JSR PC ,50$ sREPORT THE PARITY ERROR MESSAGE. 
a4 015126 000412 BR 60$ sEXIT THIS ROUTINE. 
2371 3¢ 
sate 3 LOCAL SUBROUTINE TO REPORT AN ERROR FLAG STATUS. 
“= 
2374 015130 508: PRINTX #€F9009,R1 
015130 010146 MOV R1,-CSP) 
015132 012746 006653 MOV @EF 9009, -C SP) 
015136 012746 000002 MOV @2,-CSP) 
015142 010600 MOV SP ,RO 
015144 104415 TRAP CSPNTX 
015146 062706 000006 ADD #6 ,SP 
oats 015152 000207 RTS PC 
2377 015154 004767 005500 608: JSR PC,PRTLPR sREPORT THE LPR CONTENTS FOR THIS LINE. 
2378 015160 62%: ENOMSG 
015160 L10010: 
015160 104423 T C$mMSG 


J5 
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GLOBAL ERROR REPORTING ROUTINE ER9004 
2380 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9004 - 
2381 FS SPAASAAARASHAHAHAAEOEEAAASASHERASESEAEEEEEEAEADESASEEALEEEEEAEABEEEEAEEEEEEAEDESE 
2382 34 THIS IS AN ERROR REPORTING SUBROUTINE WHICH REPORTS ape SUMMARIES 
2383 34 FOR LINES WHICH HAVE EXCEEDED THE SPECIFIED MAXIMUM NUMBER OF 
2384 3% INDIVIDUAL RECEPTION ERRORS, PROVIDED EXTENDED ERROR REPORTING HAS 
oes 3% BEEN REQUESTED BY THE OPERATOR. 
34 
2387 3@ INPUTS: Ri - ADDRESS OF MESSAGE TO PRINT FIRST. 
2388 34 ERCNTB - LABEL AT BASE OF LINE ERROR COUNTERS TABLE. 
Soee 34 ERSMRF - “REPORT ERROR SUMMARY FOR LINE” FLAGS. 
3% 
44) 3# OUTPUTS: A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 
3% 
2393 3 CALLING SEQUENCE: INCLUDE THE LABEL "ER9004” AS THE MESSAGE POINTER 
any 34 PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
3% 
2396 3@ COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
44 “4 THE CONTENTS OF GPR'S R2, R3, R4, AND RS ARE DESTROYED. 
2399 a SUBORDINATE ROUTINES USED: NONE. 
2400 FPSSHHAASSSSHSESESSHOSEHESEHAKRESEAEAESESEEAEESEEAALESEEEEADEEEEEEEEEASEEEEEEEEEEEEEEED 
2401 
2402 015162 BGNMSG ER9004 
2003 015162 ERS004: : 
2404 015162 012700 000100 MOV @BITO6,RO sTRY TO CLEAR THE 
2405 015166 700 164770 BIC OPTION,RO sEXT‘'D ERROR REPORTING FLAG 
eet 015172 001040 BNE 6% sEXIT IF FLAG NOT SET. 
2408 015174 PRINTB #€FOS03,0EM9014 ;REPORT THE SECONDARY ERROR MESSAGE. 
015174 012746 011614 MOV #€M9014 , -CSP) 
015200 012746 005453 MOV @EF 0503, -C SP) 
015204 012746 000002 MOV @2,-C(SP) 
015210 010600 MOV SP RO 
015212 104414 TRAP CSPNTB 
015214 062706 000006 ADD e 
2409 015220 CLR R2 sCLEAR THE LINE oot 
2410 015222 016703 165252 MOV ERSMRF ,R3S sGET THE ERROR SUMMARY FLAGS. 
2411 015226 005004 CLR R4& sCLEAR “LINE COUNTER TIMES 2” OFFSET. 
2412 015230 000241 2s: CLC sCLEAR THE CARRY FOR THE FOLLOWING ROTATE. 
2413 015232 006003 ROR R3 sSHIFT ANOTHER ERROR SUMMARY FLAG INTO CARRY. 
2414 015234 103013 BCC 4% sSKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR. 
2415 015236 PRINTX @#€F9010,Re2, ERCNTBCR4) 
015236 016446 003302 MOV ERCNTBCR4), -CSP) 
015242 010246 MOV R2,-CSP) 
015244 012746 006712 MOV @€F 9010, -( SP) 
015250 012746 000003 MOV #3,-(SP) 
015254 010600 MOV SP RO 
015256 104415 TRAP CSPNTX 
015260 062706 000010 #10,SP 
2416 015264 012405 4$: MOV CR4)¢,R5 s INCREMENT THE LINE OFFSET BY 2. 
2417 015266 2 INC R2 sINCREMT THE LINE COUNT a 
2418 015270 005703 TST R3 sCHECK THE ERROR SUMMARY FLAGS. 
oth 015272 001356 BNE 2s sIF MORE FLAGS SET, LOOP TO DO OTHER LINES. 
2421 015274 6%: ENOMSG 
015274 L10011: 


KS | 
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GLOBAL ERROR REPORTING ROUTINE ER9004 


015274 104423 TRAP C$MSG 


2 
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GLOBAL ERROR REPORTING ROUTINE ER900S5 - 
2423 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9O00S - 
2424 SAAEAAARAHARARESEARAEALEEALEAEAEEEEEEEAEEEAEERESERALEEAEEEEEEAEAEEEREREEEAAEEAS 
2425 34 THIS IS AN ERROR REPORTING SUBROUTINE WHICH REPORTS INCOMPLETE DATA 
ot 34 TRANSMISSIONS OR RECEPTIONS. 
3% 
2428 3# INPUTS: Rl - EITHER “TRANSMITTED” OR “RECEIVED” TO INDICATE TX OR Rx. 
2429 34 R2 - BIT MAP OF LINES WHICH DID NOT COMPLETE TX OR RX. 
2430 3% R4 - ADDRESS OF BASE OF THE CORRECT CHARACTER COUNTERS TABLE. 
2431 34 DPLENB - LABEL AT BASE OF DATA PATTERN LENGTH TABLE. 
at | 34 EM9015 - SYMBOLIC ADDRESS OF THE “TRANSMITTED” MESSAGE. 
3* 
ad 3# OUTPUTS: A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 
34 
2436 3# CALLING SEQUENCE: INCLUDE THE LABEL "ER9005” AS THE MESSAGE POINTER 
aps 34 PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
3% 
2439 3* COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 
2440 34 THE CONTENTS OF THE INDIRECT ADDRESS FIELD IN THE DUT CSR MAY 
2441 3% BE ALTERED. 
2442 Hog 
2443 3# SUBORDINATE ROUTINES USED: PRTLPR. 
2444 J SSSSAASAASASSSAASEHEAEEABRASLASELSEAAHESESEASEAEEEHAREAAEEEEEEESEEEEKEEEEEEOASEEEERE 
2445 
2446 015276 BGNMSG ER9005 
015276 ER9005: : 
2447 015276 SAVE sSAVE THE CONTENTS OF THE GPR’S. 
onek 015276 004567 170022 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
2449 015302 012700 000100 MOV @BITO6,RO sTRY TO CLEAR T 
2450 015306 046700 164650 BIC OPTION,RO sEXT'D ERROR REPORTING FLAG 
Sean 015312 001107 BNE 10% sEXIT IF FLAG NOT SET 
2453 015314 PRINTB #€F9013,R1 sREPORT THE SECONDARY ERROR MESSAGE. 
015314 010146 MOV R1,-CSP) 
015316 012746 007115 MOV @€F9013,-CSP) 
015322 012746 000002 MOV @2,-CSP) 
015326 010600 MOV SP RO 
015330 104414 TRAP CSPNTB 
015332 062706 000006 ADD 06, 
2454 015336 005003 CLR R3 sCLEAR THE LINE COUNTER. 
2455 015340 022701 011710 CMP #EM9015,R1 sCHECK IF ADDRESS CORRESPONDS TO TX MESSAGE. 
33 015344 001032 BNE 6% sBRANCH IF RECEPTION MESSAGE TO BE PRINTED. 
2458 3¢ 
eee s PERFORM TX INCOMPLETE ERROR MESSAGE REPORTING. 
g° 
2461 015346 PRINTX @€M9030 sPRINT “NO TX COMPLETION INTERRUPTS RECEIVED” 
015346 012746 012323 MOV @EM9030, -( SP) 
015352 012746 000001 MOV #1,-CSP) 
015356 010600 MOV SP RO 
015360 104415 TRAP yt 
015362 062706 000004 ADD 
2462 015366 000241 2s: CLC sCLEAR THE CARRY FOR THE FOLLOWING ROTATE. 
2463 015370 006002 ROR R2 sSHIFT “TX NOT DONE” FLAG INTO CARRY. 
2464 015372 103013 BCC 4$ sSKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR. 
2465 015374 PRINTX @#€F9020,R3 sPRINT “TOO FEW TX.ACTIONS GENERATED” MSG. 
015374 010346 MOV R3,-CSP) 
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M5 


GLOBAL ERROR REPORTING ROUTINE 


015376 


012746 
012746 


007201 
000002 
000006 
005236 JSR PC,PRTLPR 
4$: INC R3 
TST Re 
BNE 2s 
BR 10$ 
: PERFORM RX 
ae 
6%: cLC 
ROR Re 
BCC 8$ 
ASL R3 
005234 MOV TXRXLBCR3),R5S 
MOV R2,-CSP) 
MOV R5,R2 
003442 MOV CHCNTBCRS),RS 
ASR Re 
ASR 
PRINTX 
007001 
000006 
000016 
MOV CSP)+,R2 
005136 JSR PC,PRTLPR 
8$: TST CR4)>+ 
INC R3 
TST Re 
BNE 6% 
10%: PASS 
JSR 
ENOMSG 


R3 
@€F9012,R3,R1, cra), RS ,R2 


SEQ 64 


MOV #EF 9020, -C SP) 
MOV @2,-CSP) 

MOV SP ,RO 

TRAP io 


ADD #6,SP 
sREPORT CONTENTS OF oe REGISTER FOR THIS LINE. 
s INCREMENT LINE COUNTE 
sCHECK THE “TX NOT DONE “FLAGS” 
sIF MORE FLAGS SET, LOOP TO DO OTHER LINES. 
VEXIT THIS ROUTINE. 


INCOMPLETE ERROR MESSAGE REPORTING 


sCLEAR THE CARRY FOR THE FOLLOWING _— 
sSHIFT “RX NOT DONE” FLAG INTO CARR 

sSKIP PRINTING MESSAGE IF FLAG FOR Line em. 
sSHIFT LINE @ TO GIVE CORRECT TABLE OFFSET 
:GET THE “ASSOCIATED” RECEIVE LINE OFFSET. 
sSAVE THE “RX NOT DONE” FLAGS ON THE STACK. 
sCOPY THE ASSOCIATED TX LINE OFFSET. 

sGET THE TOTAL NUMBER OF EXPECTED CHARS. 
sSHIFT THE TABLE OFFSET TO GIVE A LINE NUMBER. 
sSHIFT TABLE OFFSET TO GIVE LINE NUMBER. 
sREPORT NUMBER OF CHARS ON LINE. 


MOV R2,-CSP) 
MOV RS, -CSP) 
MOV CR4),-CSP) 
MOV R1,-CSP) 
MOV R3,-CSP) 
MOV EF 9012, -C(SP) 
MOV #6,-CSP) 
MOV RO 
TRAP CSPNTX 

#16,SP 

sRESTORE THE “RX NOT DONE” FLAGS. 


sREPORT CONTENTS OF LPR REGISTER FOR THIS LINE. 
s INCREMENT THE CHARACTER COUNTER TABLE. 

s INCREMENT THE LINE COUNTER. 

sCHECK THE “RX NOT DONE FLAGS”. 

sIF MORE FLAGS SET, LOOP TO DO OTHER LINES. 
;RESTORE THE CONTENTS OF THE GPRS. 

PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 


10012: 


TRAP C$MSG 


NS 
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GLOBAL ERROR REPORTING ROUTINE ER9101 - 
2494 .SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9101 - 
2495 FASSARAKRAESARARAAEAERARARALARAEEEAARAEERARALARADELELAREAEEEEAEEAEELEEEREDASEAEERS 
2496 34 THIS IS A GENERAL ERROR REPORTING SUBROUTINE WHICH REPORTS A MESSAGE 
2497 3% WHICH TAKES A SINGLE, 2 DIGIT DECIMAL ARGUMENT AFTER THE END OF AN 
abe 34 ASCII MESSAGE. 
3 
2500 3* INPUTS: R1 - VALUE TO BE PRINTED AFTER MSG AS DECIMAL DIGITS. 
sees 3% R2 - ADDRESS OF MESSAGE TO PRINT FIRST 
3* 
Sans 3 OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 
3% 
2505 3@ CALLING SEQUENCE: INCLUDE THE LABEL “ER9101” AS THE MESSAGE POINTER 
cast 3% PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
3% 
Senn 3* COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 
34% 
2510 3* SUBORDINATE ROUTINES USED: NONE. 
2511 J SAAAASSHAASAASALASSERAREAAAEASESESLSEAESESEAASAEAEARERESAAEEEAAESEAESAAEEAEEEEESD 
2512 
2513 015536 BGNMSG ER9101 
— 015536 ER9101:: 
2515 015536 012700 000100 MOV #BITO6,RO sTRY TO CLEAR THE 
2516 015542 046700 164414 BIC OPTION,RO sEXT'D ERROR REPORTING FLAG 
2517 015546 001012 BNE es sEXIT IF FLAG NOT SET. 
315 
015550 PRINTB #EF9006,R2,R1 sREPORT THE STRING FOLLOWED BY THE NUMBER. 
015550 010146 MOV R1,-CSP) 
015552 010246 MOV R2,-CSP) 
015554 012746 006501 MOV oF »- CSP) 
015560 012746 000003 MOV @3,- 
015564 010600 MOV SP, 
015566 104414 TRAP CSPNTB 
2501 015570 062706 000010 ADD #10,SP 
2522 015574 2s: ENDMSG 
015574 L10013: 
015574 104423 TRAP C$MSG 


B6e 
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GLOBAL ERROR REPORTING ROUTINE ER9102 - 


2563 


ne 


015576 
015576 
015576 
015576 


167522 


007265 
000002 


164352 


SEQ 66 


-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9102 - 
sOROROEEEEOOEEEEEDEEEESOEEEEREEOEDEEEEEESEEEEEEEEEEEREEEESESOEEEEESESEDOOEESEES 
THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
INFORMATION AFTER THE ERROR MESSAGE HEADER, PROVIDED EXTENDED ERROR 
REPORTING HAS BEEN REQUESTED. 

THIS ROUTINE IS PASSED A BIT MAP WHICH SPECIFIES THE LINES FOR WHICH 
THE ERROR CONDITION SHOULD BE REPORTED. 


3@ INPUTS: 


3@ OUTPUTS: 


e 
3 CALLING SEQUENCE: 


3@ COMMENTS: 


Ri - ADDRESS OF THE MESSAGE TO BE PRINTED BY THIS ROUTINE. 
R2 - BIT MAP OF LINES FOR WHICH TO REPORT ERRORS. 


MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE. 


LOAD THE ADDRESS OF THE MESSAGE IN R1. 


LOAD THE BIT MAP OF LINES WITH ERRORS IN R2. 
o> THE LABEL “ER9102” AS THE MESSAGE POINTER 
CERRBLK) IN THE DIAG SUPER ERROR REPORT MACRO CALL. 


THE OUTPUT FORMAT OF THIS MESSAGE IS: 
“TEXT MESSAGE POINTED TO BY Ri” 


THE TOP MESSAGE, 


LINE 
AND THE MESSAGE FOR EACH LINE ARE PRINTED 


AS BASIC ERROR INFORMATION. 


3 
3 SUBORDINATE ROUTINES USED: NONE. 


FE SSSASSHSSSESSESHSSSESEHEESASEHESEEHSEEEESESEAEAEESSESASSESEEASEEEEEESESEEEEOEEEEE 


BGNMSG 
SAVE 


ER9102 


JSR 


ER9102:: 
sSAVE THE CONTENTS OF THE GPRS. 


RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


3¢ 
s EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 


2s: 


BIT 
BEQ 


PRINTB 


CLR 
CLC 
ROR 


Bcc 
PRINTB 


@B1T06 ,OP TION 
60% 


@€FOSO03,R1 


R3 
R2 
ag 
#€F9103,R3 


sEXIT WITH TEST FAILURE MESSAGE IF 
sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
sDURING THE SOFTWARE QUESTIONS. 


sPRINT THE FIRST LINE OF THE MESSAGE. 
MOV Ri, -CSP) 


MOV @€FOSO3, -( SP) 
MOV @2,-C(SP) 
MOV SP .RO 
TRAP CSPNTB 
ADD @6.SP 
sCLEAR THE LINE NUMBER. 
sPREPARE TO ROTATE NEXT BIT OUT OF MAP. 
sGET THE NEXT BIT OF THE BIT MAP. 
sSKIP PRINTING MESSAGE IF THE BIT IS CLEAR. 
sREPORT THIS LINE HAD THE ERROR. 
MOV P3,-CSP) 
MOV @€F 9103, -(SP) 
MOV @2,-(SP) 
MOV SP RO 
TRAP CSPNTB 
ADD #6 ,SP 


C6 
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GLOBAL ERROR REPORTING ROUTINE ER9102 
2567 015666 005203 43: INC R3 s INCREMENT THE og COUNTER. 
2568 015670 005702 TsT R2 sCHECK THE BIT M 
2569 015672 001361 BNE 2s sLOOP IF NOT ALL MSET ITS REMCVED FROM BIT MAP. 
2570 015674 PRINTB @€F9101 sPRINT A BLANK LINE. 
015674 012746 007262 MOV #€F S291, -CSP) 
015700 012746 000001 MOV #1,-(SP) 
015704 010600 MOV SP ,RO 
015706 104414 TRAP CSPNTB 
015710 062706 000004 ADO . 
2571 015714 60$: PASS Page dh on THE SAVED CONTENTS OF THE GPRS. 
015714 004736 JSR PC, @(SP)-+ sRETURN TO PREGOS SUBRT. 
2572 015716 ENOMSG 
015716 L10014: 
015716 104423 T C$MSG 


D6 
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GLOBAL ERROR REPORTING ROUTINE ER9301 
2574 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9301 - 
2575 FSSSARSSSESEHAAESSESEEEHAOEHHEHESESEESEAEEEHEEEADESEEEEEEEEESEEEEEEEEOEREREEEEEEOES 
2576 34 THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ANY BMP CODES 
2577 34 THAT ARE FOUND IN THE BMP CODE QUEVE, TOGETHER WITH THE THE NUMBER OF 
2578 34 THE TEST THAT WAS EXECUTING AT THE TIME THE BMP CODE WAS LOGGED. 
ede, 34 PROVIDED EXTENDED ERROR REPORTING HAS BEEN ENABLED. 
3% 
2581 3@ INPUTS: Ri - THE ADDRESS OF THE FIRST MESSAGE TO BE REPORTED. 
ro 3¢ R2 - THE ADDRESS OF THE NEXT EMPTY CELL IN THE QUEUE. 
44 
2584 3@ OUTPUTS: THE TEST NUMBER FOLLOWED BY THE BMP CODE ARE PRINTED AT THE 
2585 34 OPERATOR CONSOLE. 
2586 34 
2587 3@ CALLING SEQUENCE: INCLUDE THE LABEL “ER9301” AS THE MESSAGE POINTER 
=e 36 PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL 
2 34 
ite 3@ COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 
34 
2592 3@ SUBORDINATE ROUTINES USED: NONE. 
2593 FSSSASHASSHASSSSSSHSSSSESSESEEEESEHESESLEASEEESEEHSASSEESEAEEEEEEEEEEEEEEEEEEEEEEE 
2594 
2595 015720 BGNMSG ER9301 
015720 R9301:: 
2596 015720 SAVE sSAVE THE GPRS ON THE STACK. 
— 015720 004567 167400 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
2596 015724 012700 000100 MOV @#BITO6 ,RO sTRY TO CLEAR THE 
2599 015730 046700 164226 BIC OPTION,RO sEXT’'D ERROR “or aan FLAG 
oor 015734 001064 BNE 60% sEXIT IF FLAG NOT SET 
2602 015736 PRINTB @CFOSO3,R1 sREPORT UNEXPECTED BMP CODES FOUND. 
015736 010146 MOV R1.-CSP) 
015740 012746 005453 MOV #€F 0503, -C SP) 
015744 012746 000002 MOV #2,-(SP) 
015750 010600 MOV RO 
015752 104414 TRAP CePNTB 
015754 062706 000006 ADO @6.SP 
2603 015760 012703 002512 MOV @BMPCQB .RS sGET THE START ADDRESS OF THE BMP CODE QUELE. 
2604 015764 012705 012714 MOV @€M9302 ,RS sGET THE MESSAGE TO BE REPORTED. 
2605 015770 012301 2t: MOV CR3)¢,R1 sGET THE NUMBER OF THE TEST THAT WAS EXECUTING. 
2606 015772 012304 MOV CR3)+,R4 sGET BMP CODE THAT WAS REPORTED OFF THE QUEUE. 
2607 015774 004767 000056 JSR PC 50% sGO REPORT THE BMP CODE. 
2608 016000 020302 CMP R3,R2 sCHECK IF ALL CODES HAVE BEEN REPORTED. 
ate 016002 103772 BLO 2s sIF IT IS NOT THE LAST BMP CODE THEN LOOP. 
3° 
2611 s CHECK IF OVERFLOW HAS OCCURRED. 
2612 s THE CONDITIONS FOR OVERFLOW ARE: THE POINTER CONTAINS THE ADDRESS OF THE 
a8 s LAST CELL IN THE QUEUE, AND A BMP CODE HAS ALREADY BEEN WRITTEN INTO THAT 
$ CELL. 
2615 t- , 
2616 016004 020227 002706 CMP R2, @BMPCQE -4 sCHECK IF THE POINTER IS AT THE LAST LOCATION. 
2617 016010 001036 BNE 60% sEXIT If NOT AT THE LAST LOCATION. 
2618 016012 005762 000002 TST 2cR2) sCHECK FOR A BMP CODE IN THE LAST CELL 
2619 016016 001435 BEQ 60% sEXIT IF NO OVERFLOW HAS OCCURED, CELL EMPTY 
2620 016020 012301 MOV CR3)+,R1 sGET THE TEST NUMBER OFF THE QUEUE. 
2621 016022 011304 MOV CR3),R4 sGET THE BMP CODE OFF THE QUEUE. 
2622 016024 012705 012744 MOV #€M9303,R5 iSELECT THE MESSAGE TO BE REPORTED. 


OHU-11 FUNCTIONAL VERIFICATION 


GLOBAL ERROR REPORTING ROUTINE 


2623 


bah 


016030 
30 


016110 
016110 
016110 


012746 
012746 
0600 


007401 
000001 
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- ER9301 - 


508: 


E6 
PRINTX €F9302 


JSR PC, 50% 
BR 60% 


PRINTX €F9301,R5,R1,R4 


RTS PC 
PASS 
JSR 


ENOMSG 


sPRINT THE MESSAGE. 


sRETURN. 
sRESTORE THE GPR CONTENT 
PC, @(SP)+ 


sREPORT OVERFLOW CONDITION. 


ADD 
bd THE LAST BMP CODE PLACED ON THE 


L10015: 
T 


sRETURN TO PREGOS SUBRT. 


| 
SEQ 69 
EF 9302, -( SP) 
#1, -(SP) 
SP ,RO 
CSPNTX 
64,SP 
CsMsG 


F6 
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GLOBAL SUBROUTINES SECTION 


-SBTTL GLOBAL SUBROUTINES SECTION 

 CKASSIASSSGCLASSSSS SA SSCAGLASSSSSGSSGSSS SATS CASS SCASACAARK ALAA SAAS AAAS A SAAS SS 

3 

5 FVTSKL3.P1i1 

3 

 HISAHSHSACSSMA AA SHSSCSNS CSAS AAD ES SSSAIGESSNSSACASIA SHS AGSAASALGAAGEAEL ADA SESSA EBSD SS SB 


ae 
H THE GLOBAL SUBROUTINES SECTION > 1 THE SUBROUTINES 
s THAT ARE USED IN MORE THAN ONE TEST 

es 


016112 
7 016112 


26863 016116 


92 
2693 016130 
2694 016132 
2695 016134 
2696 016136 
2697 016142 
2698 016144 
2699 016146 
2700 016150 
2701 016152 
2702 016154 
2703 016156 


004567 


167206 


164104 


164036 


G6 


-SBTTL GLOBAL SUBROUTINE 
1 OF SERRESEEASESEEEEEEDEEROEEEOEEEEREREEEEEEEEEEEEEEEEEEEEEEEEERERERE REEDED EEEDES 


- ALTER DEVICE REGISTER FIELDS ROUTINE - 
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GLOBAL SUBROUTINE ALTFLD - 


- ALTFLD - 


34 THIS SUBROUTINE ALTERS THE SPECIFIED FIELD OF THE SPECIFIED DEVICE 
3% REGISTER FOR THE SPECIFIED LINES. THIS ROUTINE CAN BE USED TO SET 
34 OR CLEAR BITS WITHIN SELECTED FIELDS OF SELECTED REGISTERS. 

:* USE EXAMPLES: SET RX.BAUD.RATE FIELDS ON LINES 3 AND 6. 

i* CLEAR TX.DMA BITS ON ALL LINES. 

3 

3* INPUTS: R1 - ADDRESS OF THE REGISTERS TO ALTER. 

:4 R2 - BIT FIELOS SET TO DESIRED STATES. 

3* R3 - BIT MAP OF LINES FOR WHICH TO ALTER REGISTER. 

34 R4 - MASK OF BITS TO ALTER (1 INDICATES CHANGE BIT). 

34 CSRA - CONTAINS THE ADDRESS OF THE DEVICE CSR. 

3% IESTAT - SAVED STATES OF THE INTERRUPT ENABLE BITS. 

3% 

3@ OUTPUTS: DEVICE REGISTERS - SPECIFIED REGISTER FIELDS ALTERED. 

14 CSR IND.ADR.REG FIELD - DESTROYED. 

3% 

3@ CALLING SEQUENCE: JSR PC, ALTFLO 

34 

3@ COMMENTS: THIS ROUTINE READS THE SPECIFIED REGISTERS FOR ALL LINES 
34 WITH NUMBERS LOWER THAN THE HIGHES SPECIFIED LINE. 

34 THIS ROUTINE DOES NOT READ THE CSR. 

3% 


s@ SUBROUTINES CALLED: NONE. 


B-~— SHOSASSSSHASESSSHSSESSSESEASASESEESESSESESEASESEESSSESEHSEESEHASEEHEEEHESSEEEEEEEEED 


ALTFLO:: SAVE 


e 


JSR 


sSAVE CONTENTS OF GPRS 
RS ,PREGOS 


RO THRU 


RS. 
sCALL REGISTER SAVE SUBRT. 


; SET UP TO LOOP FOR EACH LINE: 
PREPARE THE WORD TO BE ORED INTO THE REGISTER CONTENTS. 


i SET UP THE WORD TO WRITE INTO THE IND.ADR.REG FIELD OF THE CSR. 


sCALCULATE THE NEW CONTENTS OF THE 
: REGISTER FIELDS WHICH ARE TO BE 


7 - 
MOV 
COM 
BIC 
MOV 
s¢ 


R4,RO 
RO 
RO,R2 
IESTAT,R 


s EXIT THE LOOP IF NO 
8 ALL 
g° 
CLC 
2s: ROR RZ 
Bcc 4s 
MOV RS ,8CSRA 
MOV CR1),RO 
BIC R4,RO 
BIS R2,RO 
MOV RO,CR1) 
4t: INC R5 
TST R3 
2s 


S 


ALTERRED BY THIS 


ROUTINE. 
iSET UP TO WRITE IND.ADR.REG FIELD TO O. 


s LOOP ONCE FOR EACH LINE, ALTERING THE SPECIFIED FIELD IN THE SPECIFIED 
i REGISTER IF THE LINE HAS BEEN a FOR ALTERING. 
OR IF WE HAVE ALTERED THE MAX 


LINES TO ALTER, 
OWABLE NUMBER OF LINES (AS SPECIFIED BY NUMLNS). 


sPRE*ARE FOR ROTATE, “TST RS” DOES THIS BELOW. 
sGET THE LINE SELECT BIT FOR THIS LINE. 


sSKIP SETUP IF LINE IS 
sSET DUT CSR 


NOT SELECTED. 
FIELD TO THIS LINE. 


sCLEAR THE BIT FIELDS WE ARE TO ALT 
sOR_IN THE NEW STATES OF THE FIELDS. 
SWRITE THE NEW REGISTER soe ag THE REG. 


INO. ADR .REG 
sGET THE PRESENT CONTENTS OF THE + ¥, TO ALTER. 


sSET LINE NUMBER TO THE NEXT 
CHECK FOR DL 


LINES, CLEAR CARRY FLAG. 


UNHANOLE 
sLOOP IF SELECTED LINECS) IS NOT HANDLED. 


OHU-11 FUNCTIONAL VERIFICATION M 


GLOBAL SUBROUTINE 


2704 
2705 016160 

016160 004736 
2706 016162 000207 


60$: 


PASS 
RTS 


ACRO M1200 12-DEC-83 16:16 
ALTFLD - 


PC 


JSR 


sRESTORE GPRS. 
PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 
sRETURN TO CALLING ROUTNE. 


16 
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GLOBAL SUBROUTINE CALMSL 


2737 016170 


eras 016174 


2762 
2763 016236 


004567 
005067 


012704 


167134 
0002 


000001 
164064 


164044 


002300 


164070 


-SBTTL GLOBAL SUBROUTINE - CALMSL - 

OF SOMMRAKHHSHAKAAAHASEASASAREEESEHEEHOASESEEAEEEEAEESEEAASESEEEEESEEEEEEEEEEEOEEEEA 
34 - CALIBRATE MILLI SECOND LOOP COUNT SUBROUTINE - 

34 THIS SUBROUTINE CALIBRATES THE TIMING LOOP WHICH IS USED IN THE MSLOOP 
34 ROUTINE. THIS SUBROUTINE CALCULATES A VALUE FOR THE MSLCNT VARIABLE 
34 WHICH IS THE NUMBER OF SOFTWARE LOOPS WHICH TAKES 1 MS TO EXECUTE IN 
38 THE MSLOOP ROUTINE. THIS ROUTINE CALIBRATES THE COUNT BY USING THE 

34 LINE TIME CLOCK (LTC), SO IF NO LTC IS AVAILABLE THE DEFAULT VALUE FOR 
34 THE DELAY COUNT MUST BE USED. 

3% 

34 

3 INPUTS: MSLCNT - DEFAULT 1 MS DELAY LOOP COUNT VALUE, OR 

3% VALUE FROM PREVIOUS CALIBRATION. 

34 MSTICK - NUMBER OF MS PER LTC CLOCK TICK. 

34 TIMER1 - TIMER COUNTER CHANGED BY LTC INTERRUPT SERVICE RTN. 

3° CLKHRZ - NUMBER OF LTC CLICKS PER SECOND (50 OR 60). 

3% 

3 OUTPUTS: CARRY - SET IF LTC IS AVAILABLE, AND NEW CALIBRATION PERFORMED. 
34 MSLCNT - NEW 1 MS DELAY LOOP COUNT VALUE IF LTC AVAILABLE, OR 
3% UNCHANGED IF NO LTC IS AVAILABLE. 

3% 

3@ CALLING SEQUENCE: JSR PC ,CALMSL 

3% 

3@ COMMENTS: 


3% 
s@ SUBORDINATE ROUTINES CALLED: UNSDIV,OOPS. 
B-— SHOAKAHSHSASEHESEASESEASASEHSESSSASHESSSSEESSESEEEEEEESEEKESEEEEEESEEEHEEEEEEESE 


CALMSL:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS pcs, REGISTER SAVE SUBRT. 
CLR 62% ;CLEAR THE 2ND TIME F LAG. 
; SYNCHRONIZE WITH THE LTC. 
26: MOV #1,R5 sSET OUTER LOOP COUNTER TO 1 


LOOP. 
s INCREASE THE VALUE LOADED INTO THIS COUNTER IF THE <ee 
sFOLLOWING LOOP FAILS ON FUTURE, FASTER PROCESSORS. <es 


CLR RO sCLEAR THE WAIT FOR CLOCK INT COUNTER. 
MOV #1, TIMER1 iSET UP COUNT OF 1 iS SYNCH WITH LTC. 

4$: TST TIMER1 sCHECK FOR COUNTER HAVING GONE TO ZERO. 
BEQ 6% sJUMP OUT OF LOOP IF LTC HAS INTERRUPTED. 
INC RO ;COUNT THIS ITERATION OF THE INNER LOOP. 
BNE ag ttc’ IF COUNTER HAS NOT TURNED R. 
DEC RS THE INNER LOOP COUNTER. 
BGT 4s ;LOOP IF OUTER LOOP COUNT NOT UP. 


° 

IF WE GOT NO LTC INTERRUPT, INDICATE THAT THERE IS NO LTC AVAILABLE. 
s LTC MUST BE FLAKEY, OR NOT REALLY AN LTC AT ALL. 

ge 


CLR CLKHRZ sCLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 
cLC sINDICATE FAILURE FOR RETURN. 
BR 608 sBYPASS THE FOLLOWING CALIBRATION PROCEDURES. 


WE ARE NOW SYNCHRONIZED WITH THE LTC. 
SET UP FOR THE CALIBRATION LOOP. 


$: MOV @TIMER1 ,R4 sWILL TEST TIMER1 IN THE LOOP BELOW. 


SEQ 73 





J6 
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GLOBAL SUBROUTI 


2816 016406 


000001 
164032 
000120 


003604 


163772 


163742 


010076 


003532 
163722 
000010 


CLR R1 sCLEAR THE OUTER LOOP COUNTER. 
CLR R2 sINDICATE TO CHECK ALL BITS OF TIMER1. 
CLR R3 sINDICATE TO CHECK FOR TIMER1 CLEAR. 
MOV #1,(R4) sLOAD TIMER1 WITH COUNT OF 1. 
8$: MOV MSLCNT,RS sLOAD MS LOOP COUNT. 
108: MOV (R4),RO sGET THE TIMER1 VALUE. 
MOV RO,64$ sSAVE WORD (LIKE IN THE REAL LOOP). 
BIC R2,RO {LEAVE ALL THE BITS. 
CMP RO,R3 sCOMPARE AGAINST ZERO. 
SEC sSET CARRY IN CASE OF SUCCESS. 
BEQ 12¢ sEXIT LOOP IF TIMER1 HAS CLEARED. 
DEC RS sCOUNT DOWN THE INSIDE MS LOOP COUNT. 
BNE 10% sLOOP IF MS NOT UP. 
DEC Ri sDECREMENT THE MS TIME COUNT. 
BNE 8% sKEEP LOOPING. 
JSR PC,OO0PS sWE OVERFLOWED, SOMETHING IS WRONG, ABORT. 


‘ 
s WE HAVE NOW HAVE LOOP COUNT INFORMATION FOR ONE CLOCK TICK. 

s WE HAVE NEGATIVE OF NUMBER OF OUTER LOOPS IN Ri, EACH IS MSLCNT INNER LOOPS. 
: WE HAVE THE PORTION OF THE LAST OUTER LOOP NOT EXECUTED, IN RS. 

s NOW WE CALCULATE THE TOTAL NUMBER OF INNER LOOPS EXECUTED. 
3 
1 


$: NEG Ri sGET NUMBER OF OUTER LOOPS. 


MOV MSLCNT ,R2 sGET THE NUMBER OF INNER LOOPS PER OUTER LOOP. 
MOV R2,R3 sCOPY NUMBER OF LOOPS FOR MULTIPLY 
SUB RS,R2 sCALC @ OF INNER DONE IN LAST OUTER LOOP 
MOV R2,R4 AND ADD TO ACCUMULATOR 
CLR RS sCLEAR ACCUMULAT . 
14%: DEC Ri sCHECK R1 FOR O CONDITION 
BMI 16% : SKIP MULTIPLICATION IF ZERO 
ADO R3,R4 sMULTIPLY NUMBER OF INNER 
ADC RS s LOOPS PER OUTER LOOP BY 
BR i4$ sNUMBER OF OUTER LOOPS PERFORMED. 
t¢ 
s DIVIDE THE TOTAL NUMBER OF INNER LOOPS BY THE NUMBER OF MS PER LTC TICK. 
ge 
16%: MOV MSTICK ,R1 s@ OF MS PER LTC TICK IS DIVISOR. 
MOV R4,RS sLSWORD OF LOOP COUNT IS LSWORD OF DIVIDEND. 
RS,R2 sMSWORD OF LOOP COUNT IS MSWORD OF DIVIDEND. 
JSR PC,,UNSOIV iDIVIDE NUMBER OF LOOPS BY MS PER LTC TICK. 
BcsS 16% sBYPASS OOPS IF WE'RE OK. 
JSR PC ,OOPS sCLOCK ROUTINES ARE NOT LONG ENOUGH, OR BUG. 
18%: MOV R1,MSLCNT iSET NEW VALUE FOR MS LOOP COUNT. 
COM 628 sSET THE 2ND ITERATION FLAGS IF iST ITERATION. 
BNE 2s i BRANCH IF ONLY ONE ITERATION DONE. 
SEC sSET THE SUCCESS FLAG FOR EXIT. 
60%; PASS sRESTORE GPRS, 
JSR PC, QC SP)+ sRETURN TO PREGOS SUBRT. 
RTS PC 1s CARRY - SUCCESS FLAG. SET IF SUCCESS. 
62%; -WORD O s2ND CALIBRATION ITERATION FLAGS. 
64%; -WORD O sDUMMY WORD FOR STORAGE OF THE READ WORD. 


SEQ 74 
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GLOBAL SUBROUTINE - CHKEXT 
2818 -SBTTL GLOBAL SUBROUTINE - CHKEXT - 
2819 BOF SRHEAHKAKHHKASAAAERASESASESEEAEELERARESEEEAARESEEEEAEDAEESESEAEEEEEAEEESEEREEEESA 
2820 3% - CHECK FOR EXTRA CHARACTER ROUTINE - 
2821 3% THIS SUBROUTINE CHECKS FOR THE CONDITION WHICH INDICATES THAT AN EXTRA 
2822 34 CHARACTER HAS BEEN RECEIVED DURING THE RECEPTION OF A DATA PATTERN. 
2823 34 IF THIS ROUTINE DETERMINES THAT IT IS LIKELY THAT AN EXTRA CHARACTER 
2824 34 HAS BEEN RECEIVED IT INDICATES THIS IN THE STATUS INFORMATION RETURNED 
oer 34 TO THE CALLING ROUTINE. 
3* 
2827 3@ INPUTS: R3 - RX LINE NUMBER MULTIPLIED BY 2 (OFFSET INTO WORD TABLES). 
2828 34 R4 - BASE ADDRESS OF RESYNC QUE CONTAINING RX CHARS. 
2829 34 RS - MASK OF “INACTIVE” CNON-DATA) BITS OF RX AND TX CHARS. 
2830 3% CHCNTB - BASE OF NUMBER OF CHARS TO TX ON EACH LINE TABLE. 
2831 34 RXCNTB - BASE OF THE RX CHARACTER COUNTERS TABLE. 
2832 34 RXPTRB - BASE OF THE RX CHARACTER POINTERS TABLE. 
tty 34 TXRXLB - BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 
3% 
tH 3# OUTPUTS: CARRY - SET IF EXTRA CHARACTER CONDITION IS VERIFIED. 
3% 
seer 3@ CALLING SEQUENCE: JSR PC, CHKEXT 
3% 
2839 3@ COMMENTS: THE FOLLOWING SYMBOLS ARE USED IN LINE COMMENTS: 
2840 34 CHRO - CHARACTER AT BOTTOM OF RESYNC QUE (FIRST RECEIVED). 
2641 3% CHR1, CHR2 - 2 CHARACTERS RECEIVED AFTER to 
2842 3% EXPO - CHARACTER EXPECTED TO BE RECEIVED NE 
apes 3% EXP1, EXP2 - CHARACTER EXPECTED TO BE RECEIVED AFTER EXPO, ETC. 
3% 
2845 3# SUBORDINATE ROUTINES CALLED: NONE. 
2846 F-— SHHSESHESSSSHESSSASHSESSSSSSSSHSSAKSEASESHSEHKSESHESEEEKEAEEEEEEEEEEEEEEEEEEE 
2847 016410 CHKEXT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
016410 004567 166710 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
2648 016414 016302 003402 MOV RXPTRBCR3),R2] GET THE RX DATA POINTER. 
2849 016420 005724 TST CR4)o sINCREMENT R4 BY 2 TO POINT TO CHR1. 
2850 016422 012400 MOV CR4)+,RO iGET CHR1 FROM THE QUE, DATA.VALID INTO N FLAG. 
2851 016424 100026 BPL +. a sEXIT WITH “FAILURE” IF CHR1 NOT VALID. 
2852 016426 040500 BIC RS.R sREMOVE INACTIVE BITS FROM CHR1 VALUE. 
2853 016430 112201 MOVB CRODe RL sGET EXPO FROM THE DATA PATTERN. 
2854 016432 040501 BIC RS,R1 sREMOVE INACTIVE BITS FROM EXPO VALUE. 
2855 016434 120100 CMPB R1,RO sCOMPARE CHR1 AND EXPO. 
2856 016436 001021 BNE Ses }EXIT WITH “FAILURE” IF CHR1 <> EXPO. 
2857 016440 016300 003542 MOV RXCNTBCR3),RO sCOMPARE THE PRESENT RX CHARACTER COUNT PLUS 1 
2858 016444 005200 INC RO s WITH THE EXPECTED NUMBER OF CHARS TO RX ON 
2859 016446 016301 005234 MOV TXRXLBCR3),R1 3 LINE CNUMBER TRANSMITTED AND LOOPED BACK) TO 
2860 016452 020061 003442 CMP RO, CHCNTBCR1) s O€TERMINE IF CHR1 IS LAST EXPECTED CHAR. 
2861 016456 001407 BEQ 50% sEXIT WITH “SUCCESS” IF CHR1 IS LAST CHAR. 
2862 016460 011400 MOV CR4),RO sGET CHR2 FROM THE QUE, DATA.VALID INTO N FLAG. 
2863 016462 100005 BPL 50¢ }EXIT WITH “SUCCESS” IF CHR1 WAS LAST IN QUE. 
2864 016464 040500 BIC RS,RO sREMOVE INACTIVE BITS FROM CHR2 VALUE. 
2865 016466 111201 MOVE (R2),R1 iGET THE EXP1 VALUE. 
2866 016470 040501 BIC RS,R1 sREMOVE INACTIVE BITS FROM EXP1 VALUE. 
2867 016472 020001 CMP RO,R1 sCOMPARE CHR2 AND EXP1. 
noes 016474 001002 BNE 528 sEXIT WITH “FAILURE” IF CHR2 <> EXP1. 
2870 3° 
2871 s IT IS LIKELY THAT WE RECEIVED AN EXTRA CHARACTER WITHIN THE DATA PATTERN. 
2872 s INDICATE “SUCCESS” AND EXIT. 


2873 a 
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2874 016476 000261 50$: SEC sSET THE SUCCESS FLAG. 
2875 016500 000401 BR 60$ sEXIT THE ROUTINE. 
a 
3° 
2878 s WE OION'T RECEIVE A SINGLE EXTRA CHARACTER AT THIS POINT IN THE DATA PATTERN. 
seas s INDICATE “FAILURE” AND EXIT. 
3 > 
2881 016502 000241 S2s; cLC sCLEAR THE SUCCESS FLAG. 
2883 016504 608: PASS sRESTORE GPRS. 
016504 004736 JSR PC, @CSP)+ sRETURN TO PREGOS SUBRT. 
2884 016506 000207 RTS PC sCARRY - SET IF SUCCESS CEXTRA CHAR RXED). 
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2886 -SBTTL GLOBAL SUBROUTINE - CHKLOS - 
2887 FOF ARESAAAAREAASALESASAEALEASEAREAAARESEEHAOEAREREAREEEEAEAEESAEEEESERERESEEEEKSE 
2888 3% - CHECK FOR LOST CHARACTER ROUTINE - 
2889 34 THIS SUBROUTINE CHECKS FOR THE CONDITION WHICH INDICATES THAT A CHAR 
2890 34 HAS BEEN “LOST” FROM THE LOOPED BACK DATA PATTERN DURING A TRANSMISSION 
2891 3% AND RECEPTION TEST. IF THIS ROUTINE DETERMINES THAT IT IS LIKELY THAT 
2892 3% A CHARACTER HAS BEEN LOST, IT INDICATES THIS IN THE STATUS INFORMATION 
ooes 34 RETURNED TO THE CALLING ROUTINE. 
3* 
2895 3* INPUTS: os - RX LINE NUMBER MULTIPLIED BY 2 COFFSET INTO WORD TABLES). 
2896 3% - BASE ADDRESS OF RESYNC QUE CONTAINING RX CHARS. 
2897 3% RS - MASK OF “INACTIVE” CNON-DATA) BITS OF RX AND TX CHARS WITH 
2898 3% ALL SET BITS IN A SINGLE, LEFT JUSTIFIED GROUP. 
2899 34 CHCNTB - BASE OF NUMBER OF CHARS TO TX ON EACH LINE TABLE. 
2900 3% RXCNTB - BASE OF THE RX CHARACTER COUNTERS TABLE. 
2901 34 RXPTRB - BASE OF THE RX CHARACTER POINTERS TABLE. 
tos | 3% TXRXLB - BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 
34 
cos 3* OUTPUTS: CARRY - SET IF LOST CHARACTER CONDITION IS VERIFIED. 
3* 
dos 3# CALLING SEQUENCE: JSR PC..CHKLOS 
34 
2908 3@ COMMENTS: THE FOLLOWING SYMBOLS ARE USED IN LINE COMMENTS: 
2909 34 CHRO - CHARACTER AT BOTTOM OF RESYNC QUE (FIRST RECEIVED). 
2910 34 CHR1, “CHR2 - 2 CHARACTERS RECEIVED AFTER CHRO. 
2911 34 EXPO. - CHARACTER EXPECTED TO BE RECEIVED NEXT. 
45 | 34 EXP1, EXP2 - CHARACTER EXPECTED TO BE RECEIVED AFTER EXPO, ETC. 
3% 
2914 3# SUBORDINATE ROUTINES CALLED: NONE. 
2915 ZS -—— SHHAHSSNSSSSHASSHASSSSHASEHEESSSSSHESADESSASHASSSSAOSEHSEASSEASEAESESEAKESESEASEED 
2916 016510 CHKLOS:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
016510 004567 166610 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
2917 016514 016301 003542 MOV RXCNTBCR3),R1 sCOMPARE THE PRESENT RX CHARACTER COUNT PLUS 1 
2918 016520 005201 INC R1 3s WITH THE EXPECTED NUMBER OF CHARS TO RX ON 
2919 016522 016300 005234 MOV TXRXLBCR3),RO 3 LINE CNUMBER TXED AND LOOPED BACK) TO 
2920 016526 016002 003442 MOV CHCNTBC(RO),R2 s DETERMINE IF THE POSSIBLE LOST CHAR 
2921 016532 020102 CMP R1,R2 s WOULD BE THE LAST EXPECTED RX CHAR. 
2922 016534 001423 BEQ 52s sEXIT WITH “FAILURE” IF LOST CHR WOULD BE LAST. 
2923 016536 005201 INC R1 sODETERMINE CAS ABOVE) IF CHRO WOULD BE THE LAST 
2924 016540 160201 SUB R2,R1 s RX CHAR AND SAVE RESULT FOR LATER. 
2925 016542 016302 0034.” MOV RXPTRBCR3),R2 sGET THE RX DATA POINTER. 
2926 016546 005202 INC Re sCALCULATE POINTER TO EXP1 LOCATION. 
2927 016550 112200 MOVB (CR2)+,RO sGET EXP1 VALUE FROM DATA PATTERN. 
2928 016552 162400 SUB CR4)+,RO sCOMPARE CHRO AND EXP1 VALUES. 
2929 016554 040500 BIC RS,RO sREMOVE INACTIVE BITS FROM pg (NO ACTIVE 
2930 s BITS ALLOWED TO LEFT OF ANY INACTIVE BITS.) 
2931 016556 001012 BNE 52s sEXIT WITH “FAILURE” IF CHRO <> EXP1. 
2932 016560 005701 TST R1 sCHECK CHRO TEST RESULT SAVED ABOVE. 
2933 016562 001406 BEQ 50% }EXIT WITH “SUCCESS” IF wee IS LAST CHAR. 
2934 016564 011401 MOV 0 taste sGET CHR1 FROM THE QUE, DATA.VALID INTO N FLAG. 
2935 016566 100004 BPL sEXIT WITH “SUCCESS” IF CHRO WAS LAST QUE CHAR. 
2936 016570 111200 MOVB che), RO sGET THE EXP2 VALUE FROM THE DATA PATTERN. 
2937 016572 160001 SUB RO, Ri sCOMPARE THE EXP2 AND THE CHR1 VALUES. 
2938 016574 040501 BIC RS5,R1 sREMOVE INACTIVE BITS FROM RESULT OF COMPARE 
2939 s (NO ACTIVE BITS LEFT OF INACTIVE BITS.) 
ten 016576 001002 BNE Ses sEXIT WITH “FAILURE” IF CHR1 <> EXP2. 
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uy 


‘¢ 
2943 ; IT IS LIKELY THAT WE LOST A ——— FROM THE DATA PATTERN. 
Sees : INDICATE “SUCCESS” AND EXIT 
2946 016600 000261 508: SEC sSET THE SUCCESS FLAG. 
tot 016602 000401 BR 60$ sEXIT THE ROUTINE. 
2949 
cone : INDICATE “FAILURE” AND EXIT. 
7? 
one 016604 000241 Ses: CLC sCLEAR THE SUCCESS FLAG. 
2955 016606 60%: PASS sRESTORE GPRS. 
016606 004736 JSR PC, a(SP)-+ RETURN TO PREGOS SUBRT. 


3+ . 
2950 ; WE DION'T LOSE A SINGLE EXTRA CHARACTER AT THIS POINT IN THE DATA PATTERN. 
2956 016610 000207 RTS PC sCARRY - SET IF SUCCESS €LOsT CHAR LIKELY). 


B/ 
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166506 


011351 


100000 


003402 


163660 


-SBTTL GLOBAL SUBROUTINE - CKCHR - 

$F SHOKSSSHESEASASEEEASHAEASEEEOHEEESEEESEEEEESEEEEEEEEAEESEEEEEEEEEEEEEEEEEEEEE 
:¢ - CHECK CHARACTER FOR ERRORS ROUTINE - 

34 THIS SUBROUTINE CHECKS THE CHARACTER AT THE BOTTOM OF THE RESYNC QUEUE 
3° TO DETERMINE IF IT IS CORRECT. POINTERS AND COUNTERS WHICH ARE RELATED 
3¢ TO THE RECEPTION OF THE CHARACTER ARE UPDATED. IF THE CHARACTER IS 

i¢ INCORRECT, AN ANALYSIS OF THE ERROR IS DONE AND PARAMETERS ARE SET UP 
34 FOR THE REPORTING OF THE CORRECT ERROR. 

3¢ 

3¢ INPUTS: R3 - LINE OFFSET FOR ACCESS -. WORD TABLES OF LINE VARIABLES. 
36 R4 - BASE ADDRESS OF THE RESYNC QUEUE FOR THIS LINE. 

3¢ RS - MASK OF THE INACTIVES BITS IN A TX OR RX CHAR BYTE. 

i¢ BITTBL - TABLE OF WORDS WITH BITS SET FOR USE IN FORMING MAPS. 
3¢ OPRSQ - DATA PATTERN RESYNC QUE WITH VALID CHAR AT BOTTOM. 

3¢ EXCNTB - BASE OF THE EXTRA CHARACTER COUTERS TABLE. 

3¢ RXDONF - RECEIVE DONE FLAGS. 

34 RXPTRB - BASE OF THE RX CHARACTER POINTERS TABLE. 

3¢ ERROR MESSAGE LABELS - EM9007,EM9008,EM9027 ,EM9028 

34 

3@ OUTPUTS: Ri - CONTAINS THE ADORESS OF THE ERROR MESSAGE TO BE REPORTED. 
34 R2 - CONTAINS THE ACTUAL RECEIVED DATA. 

34 R4 - CONTAINS THE EXPECTED DATA. 

s¢ CARRY - “SUCCESS” FLAG (SET IF NO ERROR IS FOUND). 

16 FOLLOWING VARIABLES UPDATED FOR LINE ON WHICH CHAR WAS RECEIVED: 
:¢ EXCNT - COUNT OF THE NUMBER OF EXTRA CHARS RECEIVED ON LINE. 
3¢ RXCNT - COUNT OF THE NUMBER OF CHARACTERS RECEIVED ON LINE. 

36 RXPTR - UPDATED TO POINT TO THE NEXT EXPECTED CHAR ON LINE. 

3@ ERRBLK - CONTENTS DESTROYED. 

34 

3@ CALLING SEQUENCE: JSR PC .CKCHR 

34 

3¢@ COMMENTS: 


3¢ 
3@ SUBORDINATE ROUTINES CALLED: CHKEXT,CHKLOS,UPOCHR. 
B—— SEHEESSSESSSHESSSASHEESSSHEHSSESESESESHSHESHSSHOOSSEHEESESSEEEEEEEEEEEEEEEEEED 
CKCHR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


° 
; CHECK FOR THE RX OF A CHAR AFTER RX SHOULD BE COMPLETE ON THIS LINE. 


$7 
BIT BITTBLCRS),RXDONF sTEST THE RX DONE FLAG FOR THIS LINE. 
BEQ 26 sSKIP ERROR REPORT IF RX NOT COMPLETE ON LINE. 
° 


WE HAVE RECEIVED AN EXTRA CHARACTER ON THIS LINE. 

SET UP FOR ERROR REPORT eo EXIT TO REPORT THE ERROR. 

COUNT THE EXTRA CHARACTER 

s EXIT TO REPORT “UNEXPECTED CHAR RECEIVED AFTER RX COMPLETE ON LINE NN” 
t- 


MOV @€M9007 ,R1 sSELECT “EXTRA CHAR ON LINE” ERROR MESSAGE. 
MOV (R4),R2 sGET THE ACTUAL DATA FOR ERROR REPORT. 

BIC RS,R2 sREMOVE THE INACTIVE BITS. 

BIS $6IT15,R4 VINDICATE “NONE” EXPECTED DATA FOR ERROR RPT. 
BR 128 1GO COUNT EXTRA CHAR AND EXIT WITH “FAILURE”. 


3° 

s GET THE POINTER TO THE NEXT EXPECTED RECEIVE DATA CHARACTER. 
t- 

26: MOV RXPTRBCR3),R2 


SEQ 79 
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3014 3° 
sore 3 COMPARE THE ACTUAL DATA WITH THE EXPECTED DATA. 
1 = 
3017 016650 011400 MOV (R4),RO sGET THE ACTUAL DATA. 
3018 016652 040500 BIC RS,RO sREMOVE THE INACTIVE BITS. 
3019 016654 111201 MOVB (R2),R1 sGET THE EXPECTED DATA. 
3020 016656 040501 BIC RS,R1 sREMOVE THE INACTIVE BITS. 
3021 016660 120001 CMPB =RO,R1 sCOMPARE ACTUAL AND EXPECTED. ° 
3022 016662 001003 BNE 4% sCHECK FURTHER IF DATA MISCOMPARE. 
3023 016664 004767 007720 JSR PC, UPOCHR sUPDATE PTRS AND COUNTERS FOR THE CHAR. 
3024 016670 000446 BR 508% sEXIT WITH “SUCCESS”, NO ERROR FOUND. 
3025 3¢ 
3026 3s ACTUAL AND EXPECTED DATA MISCOMPARE. 
aod DETERMINE IF IT'S LIKELY WE RECEIVED AN EXTRA CHAR WITHIN THE DATA PATTERN. 
3029 016672 004767 177512 as: JSR PC ,.CHKEXT sCHECK FOR EXTRA CHAR RX‘ED IN PATTERN. 
Soar 016676 103010 BCC 63% 3GO CHECK FOR LOST CHAR IF NO EXTRA CHAR. 
3° 
3032 s IT IS LIKELY THAT WE RECEIVED AN EXTRA CHARACTER WITHIN THE DATA PATTERN. 
3033 3s COUNT THE CHAR AS AN EXTRA CHAR, DON’T COUNT AS A STANDARD CHAR. 
on ; REPORT “EXTRA CHAR RECEIVED WITHIN DATA PATTERN ON LINE NN” 
3036 016700 012701 012164 ‘ MOV @€M9027 ,R1 sSELECT “EXTRA CHAR ON oy * — MSG. 
3037 016704 111200 MOVB CR2),RO sGET THE EXPECTED RECEIVE D 
3038 016706 040500 BIC RS,RO sREMOVE THE INACTIVE BITS PROn EXPECTED DATA. 
3039 016710 011402 MOV CR4),R2 :GET THE ACTUAL RECEIVE DAT 
3040 016712 040502 BIC RS,R2 sREMOVE THE INACTIVE BITS FROM ACTUAL DATA. 
3041 016714 010004 MOV RO,R4 SPASS EXPECTED DATA TO ERROR REPORT ROUTINE. 
sose 016716 000424 BR 12% sGO COUNT EXTRA CHAR AND EXIT WITH “FAILURE”. 
& 
3084 : ACTUAL AND EXPECTED DATA MISCOMPARE. 
3045 s NOT LIKELY THAT WE RECEIVED AN EXTRA CHARACTER WITHIN THE DATA PATTERN. 
cost 3s DETERMINE IF IT'S LIKELY WE LOST A CHARACTER FROM THE DATA PATTERN. 
id 
3048 016720 004767 177564 6%: JSR PC, CHKLOS sCHECK FOR A LOST CHAR CONDITION. 
3049 016724 103012 Bcc 8s 3GO REPORT BAD RX DATA IF NOT LOST CHAR. 
3050 8¢ 
3051 : IT IS LIKELY THAT WE LOST A CHARACTER FROM THE DATA PATTERN. 
3052 s COUNT THE CHAR IN THE RX CHAR COUNT AS IF IT HAD BEEN RECEIVED. 
3053 s ALSO, COUNT CHRO AS A VALID CHAR, BECAUSE WE HAVE VERIFIED IT ABOVE. 
ood s REPORT “SINGLE CHAR MISSING FROM RECEIVED DATA ON LINE NN” 
3056 016726 012701 012244 : MOV #€M9028 ,R1 sSELECT “LOST CHAR ON LINE” — MSG. trttt 
3057 016732 111200 MOvB CR2),RO + THE wo teaet RECEIVE DAT 
3058 016734 040500 BIC RS,RO REMOVE THE INACTIVE BITS PROn EXPECTED DATA. 
3059 016736 011402 MOV CR4),R2 'GET THE ACTUAL RECEIVE DAT 
3060 016740 040502 BIC RS,R2 sREMOVE THE INACTIVE BITS FROM ACTUAL DATA. 
3061 016742 010004 MOV RO,.R4 sPASS EXPECTED DATA TO ERROR REPORT ROUTINE. 
3062 016744 004767 007640 JSR PC ,.UPOCHR S UPDATE PTRS AND COUNTERS FOR THE CHAR. 
3063 016750 000404 BR 1086 3GO EXIT WITH “FAILURE”. 
3064 a 
3065 s OID NOT LOSE OR GAIN A SINGLE CHARACTER FROM/TO THE DATA PATTERN. 
aoe s REPORT “RECEIVED CHAR MISCOMPARE AGAINST TX DATA ON LINE NN“ 
g2 
3068 016752 010002 84; MOV RO,R2 sPASS ACTUAL DATUM TO ERROR REPORT ROUTINE. 
3069 016754 010104 MOV R1,R4 sPASS EXPECTED DATUM TO ERROR REPORT ROUTINE. 


3070 016756 012701 011434 MOV #EM9006 ,R1 sSELECT THE “DATA MISCOMPARE” MESSAGE. 


nn 


GLOBAL SUBROUTINE 


3074 016762 
3075 016766 


3079 016770 
3080 016774 
3081 016776 


3085S 017002 
017004 


3090 

3091 

3092 017006 

3093 

3094 017010 
017010 


004767 
000405 


007622 


003242 
003242 


000012 
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3¢ 
s UPDATE THE CHARACTER COUNTER AND RX DATA PATTERN POINTER FOR THIS LINE. 


3 _ 
108: JSR PC ,UPDCHR 
BR 14% 


sUPDATE RX PTR AND COUNTER FOR THIS LINE. 
1GO EXIT WITH “FAILURE”. 


3¢ 
s COUNT THE CHARACTER AS AN EXTRA CHARACTER. 


3 _ 
l2$: INC —_— 
BNE 14 
DEC EXCNTBCRS) 


3¢ 
s INDICATE “FAILURE” AND EXIT. 


: = 
14%: CLC 
BR 60% 


; No ERROR WAS FOUND. 


; SET “SUCCESS” FLAG AND EXIT. 


50s : SEC 
608: PASS R1,R2,R4 
MOV 
MOV 
MOV 
JSR 
RTS PC 


s INCREMENT THE EXTRA CHAR COUNT FOR THIS LINE. 
sEXIT WITH FAILURE IF NO OVERFLOW. 
sDECREMENT BACK TO -1 (MAX VALUE) IF OVERFLOW. 


sCLEAR THE “SUCCESS” FLAG. 
sEXIT THE ROUTINE. 


sSET THE “SUCCESS” FLAG. 


sRESTORE GPRS, EXCEPT 

Ri. RISLOTCSP) sPUT R1 IN STACK SLOT. 
R2,R2SLOT(SP) sPUT R2 IN STACK SLOT. 
R4,RASLOT(SP) sPUT R4 IN STACK SLOT. 
PC, @( SP) RETURN TO PREGOS SUBRT. 


° 7 
iRi - CONTAINS THE ADORESS OF 
iR2 - CONTAINS THE ACTUAL DATA RECEIVED. 
}R4 - CONTAINS THE EXPECTED DATA. 


aj 
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3100 -SBTTL GLOBAL SUBROUTINE - CKFRPR - 
3101 JOO MORRO EEEEEEEEAEEEAEEEDEAEEEEEEEEESEEESEEEEEESEEEEREEEEEDEREREEEEEEEEEEEEEES 
3102 14 CHECK FRAMING AND PARITY ERROR REPORTING - 
3103 +4 THIS SUBROUTINE IS USED IN THE FRAMING ERROR AND PARITY ERROR TESTS. 
3104 34 IT READS THE CHARACTERS FROM THE DUT RECEIVER CHARACTER FIFO, 
3105 3* AND CHECKS FOR THE CORRECT COMBINATION OF PARITY AND FRAMING 
3106 34 ERROR BITS IN THE MSB. IF CHARACTERS STOP APPEARING IN THE FIFO WITH 
3107 34 DATA.VALID SET OR IF MORE THAN THE ALLOWABLE NUMBER OF CHARS CTERS 
3108 34 HAS BEEN READ FROM THE DUT THIS ROUTINE EXITS WITH AN RX COMPLETE 
3109 34 INDICATION. EACH READ CHAR IS ANALYSED AND ANY NECESSARY ERRORS ARE 
aaae 34 REPORTED. 

34 
3112 3@ INPUTS: RS - TEST FLAG, BIT1S SET = FRAMING ERR, CLEAR = PARITY ERR. 
3113 34 ERRNBR - SET TO ERROR NUMBER OF FIRST ERROR IN THIS ROUTINE. 
3114 34 OSTEND - ADDRESS OF THE END OF THE OUTPUT STORAGE FIFO BUFFER. 
cts 34 OSTPTR - POINTER TO THE NEXT BYTE TO READ FROM OSTORE. 

34 
3117 3@ OUTPUTS: RXCNTB - RECEIVE CHARATER COUNT UPDATED FOR EACH LINE 
tT +e RXPNTB - RECEIVE CHARACTER PIONTER IS UPDATED FOR EACH LINE. 

34% 
Suse 3@ CALLING SEQUENCE: JSR PC .CKFRPR 

34 
3122 3@ COMMENTS: THIS ROUTINE REPORTS — WITH NUMBERS INITIAL ERRNBR 
3123 36 THRU INITIAL ERRNBR « 
teed 34 ERRNBR IS RESTORED BEFORE THIS ROUTINE RETURNS. 

34 
3126 3@ SUBORDINATE ROUTINES CALLED: PRFRME,PRPARE ,WAIBIS. 
ay B-- 90666660666066666006000660066660606606066606600006060006000600000000000000000006 
3129 017030 CKFRPR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

017030 004567 166270 JSR RS , PREGOS sCALL REGISTER SAVE SUBRT. 

3130 017034 016704 166256 MOV ERRNBR .R4 s PRESERVE THE INITIAL ERROR NUMBER. 
arse 017040 004767 006706 JSR PC, TXIE1 SENABLE TX INTERRUPTS. 

Sl 
3133 : WAIT FOR A CHARACTER TO APPEAR IN THE FIFO. 
Ed 3s IF NO CHARACTER APPEARS WITHIN TIME-OUT PERIOD: EXIT ROUTINE, WE'RE DONE. 

3- 
3136 017044 016701 163176 MOV RXTOUT,.R1 sGET MINIMUM TIME OUT VALUE. 
3137 017050 026767 163426 163114 2%: CMP TXDONF , ACTLNS sCHECK FOR TRANSMISSION DONE ON ACTIVE LINES. 
3138 017056 001402 BEQ 4% sSKIP ADDING SO MS DELAY IF TX DONE ALL LINES. 
3139 017060 062701 000062 ADO #50. .R1 sADOD SO MILLI SEC TO DELAY IF NOT LAST CHAR. 
3140 017064 052701 170000 4$: BIS #170000 ,R1 s INDICATE TO TEST DATA.VALIO BIT. 
3141 017070 016702 163106 MOV RBUFA,R2 sINOICATE TO CHECK DUT RECEIVE BUFFER (FIFO). 
3142 017074 004767 010004 JSR PC, ,WAIBIS sWAIT FOR RECEIVED CHAR OR TIME-OUT. 
aes 017100 103054 Bcc 608 sEXIT ROUTINE IF TIME-OUT, WE'RE DONE. 
3145 017102 005367 163370 DEC CHRTOT sDECREMENT THE TOTAL CHAR COUNTER. 
3146 017106 001014 BNE 66 sSKIP ERROR IF NOT TOO MANY CHARS RECEIVED. 
3147 017110 010467 166202 MOV R4,ERRNBR sSET ERROR NUMBER TO INITIAL ERRNBR. 
3148 017114 012701 012044 MOV @€M9025 ,R1 }SELECT THE ERROR MESSAGE TO BE Peaster 
eed 017120 012767 <°4124 166174 MOV @EROSOS, ,ERRBLK ;,SELECT THE ERROR REPORT ROUTINE 

s¢ 
3151 3 REPORT ERROR AT INITIAL ERRNBR. 
es s “MORE THAN TWICE THE EXPECTED NUMBER OF CHARACTERS RECEIVED” 
t- 
3154 017126 ERROR P >>>>> ERROR <<ccc, 
017126 104460 TRAP CSERROR 


GLOBAL SUBROUTINE 


017130 
017136 


017140 
017142 
017144 
017150 


012767 
000435 


000001 163066 


177760 


003162 
163036 


000100 162764 


003242 
163012 


000100 162740 
007360 


166060 


MOV 
BR 


F7 
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#1,F ERROR 
60$ 


sINDICATE THAT AN ERROR HAS BEEN FOUND. 
sEXIT THIS ROUTINE WE HAVE GIVEN UP. 


3¢ 
s EXTRACT THE LINE NUMBER OF THE NEW CHARACTER. 
s CALCULATE OFFSET FOR ACCESSING TABLES OF LINE VARIABLES. 


ee 
6%: 


sCOPY THE READ CHARACTER. 

sGET THE LINE NUMBER IN THE LSB. 

sCLEAR THE UNWANTED BITS. 

sSHIFT LEFT TO FORM OFFSET INTO TABLES. 


3¢ 
s PROCESS THE READ CHARACTERS AS DICTATED BY THE TEST FLAG. 


10%: 


MOV R2,R3 

SWAB RS 

BIC @177760,R3 

ASL R3 

MOV RS,.RS 
BPL 8s 
JSR PC , PRFRME 

TST FERROR 
BEQ 10% 

BIT @6IT06 OPTION 
BNE 10% 
BR 60% 

SR PC ,PRPARE 

TST FERROR 

Q 10% 
BIT @B1T06,OPTION 
Q 608 

JSR PC,,UPOCHR 
BR es 

MOV R4,ERRNBR 
PASS 

JSR 

RTS PC 


sDETERMIN WHICH TEST CALLED THIS ROUTINE. 
sBRANCH TO PROCESS CHARACTER IN PARITY TEST. 


sPROCESS FRAMING ERRORS RECEIVED. 
sHAS AN ERROR BEEN DETECTED ? 
sNO, THEN SKIP PROCESSING CHARACTERS FOR PARITY 


Tv. 
SHAS EXTENDED ERROR REPORTING BEEN ENABLED ? 
sBRANCH IF IT HAS, 
sOTHERWISE EXIT. 


ts oa PARITY ERRORS RECEIVED. 
HAS AN ERROR BEEN DETECTED ? 

1NO, THEN BRANCH TO UPDATE POINTERS. 

sHAS EXTENDED ERROR REPORTING BEEN ENABLED ? 

sEXIT IF IT HASN'T. 


sUPDATE POINTERS AND COUNTERS FOR THIS LINE. 
sLOOP TO READ NEXT CHAR FROM FIFO. 


sRESTORE THE ERROR NUMBER TO ITS INITIAL VALUE. 


sRESTORE GPRS. 
PC, @CSP)+ sRETURN TO PREGOS SUBRT. 


SEQ 83 


G7 
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GLOBAL SUBROUTINE CKINAC 


017242 
017242 


017264 


3242 017270 


017276 


004567 


166056 


177760 


005234 
002364 162674 


-SBTTL GLOBAL SUBROUTINE - CKINAC - 


OF SHAAASESHSHSSKAASSASHEAAHHASESEEEESEEEALALEEADEEESEEASEEEEEEEEASEESEEEEEEROEEKREESE 
:4 - CHECK FOR NEW CHARACTER ON INACTIVE LINE ROUTINE - 

34 THIS SUBROUTINE CHECKS A CHARACTER TO DETERMINE IF THE CHARACTER 

34 WAS RECEIVED ON AN ACTIVE LINE. IF THE CHARACTER WAS RECEIVED ON 
34 AN INACTIVE LINE THIS ROUTINE RECORDS THE FACT THAT THE CHARACTER 
34 WAS RECEIVED ON AN INACTIVE LINE, PREPARES AN ERROR MESSAGE FOR 

3% THE CALLING ROUTINE, AND RETURNS A “FAILURE” STATUS. 

34% 

3@ INPUTS: R2 - THE RX CHARACTER INCLUDING ERROR FLAGS AND LINE NUMBER. 
34 ACTLNS - BIT MAP OF ACTIVE DUT LINES. 

i* BITTBL - TABLE OF WORDS WITH BITS SET FOR FORMING BIT MAPS. 
34 EM9006 - LABEL AT “RX ON INACTIVE LINE” ERROR MESSGE. 

3% EXCNTB - BASE OF THE EXTRA CHARACTER COUTERS TABLE. 

34 TXRXLB - BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 

4, 

3# OUTPUTS: CARRY - “SUCCESS” FLAG (SET IF NO ERROR FOUND). 

34 R1 - IF ERROR FOUND, ADDRESS OF ERROR MESSAGE. 

34 R3 - LINE NUMBER OFFSET OF PASSED IN CHARACTER. 

3% R4 - IF ERROR FOUND, EXPECTED DATA INDICATION FOR ERROR RPT. 
34 EXCNT - EXTRA CHARACTER COUNT FOR LINE CUPDATED IF ERROR). 
34 

3@ CALLING SEQUENCE: JSR PC, CKINAC 

36 

3@ COMMENTS: 


te 
3@ SUBORDINATE ROUTINES CALLED: NONE. 
Bx SHEHHEHESESAKESEEAEAEHEHREREHHAAAREHEDEHREKEAEEREEEALEAEHEASERAEEHKEEEEEASEKEEKESEEH 


CKINAC:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS , PREGOS sCALL REGISTER SAVE SUBRT. 


+ 

; EXTRACT THE LINE NUMBER FROM THE PASSED IN CHARACTER AND USE THE LINE 
s NUMBER TO FORM AN OFFSET FOR ACCESSING TABLES OF LINE VARIABLES. 

ge 


MOV R2,R3 sEXTRACT THE LINE NUMBER 
SWAB RS s FROM THE CHARACTER WE 
BIC #177760 ,R3 s__ARE COMPARING. 
ASL R3 sFORM OFFSET INTO WORD TABLE FROM LINE NUMBER. 
3¢ 
3s IF THE CHARACTER IN QUESTION IS NOT A VALID CHARACTER, EXIT WITH “SUCCESS”. 
t- 
TST Re sCHECK DATA.VALIO BIT. 
BPL 50% sEXIT WITH SUCCESS IF CHAR IS NOT VALID. 


° 


a 
s IF THE TX LINE WHICH IS ASSOCIATED WITH THIS RX LINE IS AN ACTIVE LINE, 
s EXIT THE ROUTINE WITH “SUCCESS”. 


ge 
MOV TXRXLBCR3),.R1 ;GET THE TX LINE @ OFFSET FOR THIS RX LINE. 
BIT BITTBLC(R1),ACTLNS ;,DETERMINE IF TX LINE IS AN ACTIVE LINE. 
BNE 508 sEXIT ROUTINE WITH SUCCESS IF LINE IS ACTIVE. 
3° 


s THE CHARACTER IN QUESTION WAS RECEIVED ON AN INACTIVE LINE. 
s COUNT THIS CHARACTER AS AN EXTRA CHAR. 

s SET UP ERROR INFORMATION. 

s EXIT ROUTINE WITH “FAILURE” INDICATION. 

g2 


SEQ 84 





H7 | 
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GLOBAL SUBROUTINE CKINAC 
3250 017300 005263 003242 INC EXCNTBC(RS) sINCREMENT THE EXTRA CHAR COUNT FOR THIS LINE. 
3251 017304 001002 BNE 2s sSKIP SETTING TO MAX VALUE IF NO OVERFLOW. 
3252 017306 005363 003242 DEC EXCNTBCR3) sDECREMENT BACK TO -1 (MAX VALUE) IF OVERFLOW. 
3253 017312 012701 011276 2s: MOV #EM9006 ,R1 sSET UP RX ON INACTIVE LINE MESSAGE. 
3254 017316 012704 100000 
3255 017322 000241 CLC sCLEAR THE “SUCCESS” FLAG. 
ooae 017324 000401 BR 60% sGO REPORT RX CHAR ON INACTIVE LINE. 
3258 se 
3259 3; WE HAVE NOT FOUND A “CHAR ON INACTIVE LINE” ERROR SITUATION. 
foes s SET THE “SUCCESS” FLAG AND EXIT THE ROUTINE. 
a ¢ 
| 017326 000261 S08: SEC sSET THE “SUCCESS” FLAG. 
3264 017330 60%: PASS R1,R3,R4 sRESTORE GPRS, EXCEPT OUTPUT GPRS. 
017330 010166 000004 MOV R1,RISLOTCSP) sPUT R1 IN STACK SLOT. 
017334 010366 000010 MOV R3,R3SLOT(SP) sPUT R3 IN STACK SLOT. 
017340 010466 000012 MOV R4,R4SLOT(SP) sPUT R4 IN STACK SLOT. 
017344 004736 JSR PC, @CSP + sRETURN TO PREGOS SUBRT. 
3265 017346 000207 RTS PC s CARRY - SUCCESS FLAG (SET IF NO ERROR). 


MOV #BIT15,R4 sSET UP_ “NONE” hy DATA INDICATION. 


3297 017374 
017374 
3298 017376 


GLOBAL SUBROUTINE 


004567 165750 
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-SBTTL GLOBAL SUBROUTINE 


I7 


SEQ 86 


- CKTRAP - 


FSRHAHASHHEHHSEAESSASARESADAASAEEDEEDEEAEEELEEEAEEEEEEASESEEEEEESEEEEEEEEEESESE 


3* CHECK TRAP ROUTINE - 

34 THIS SUBROUTINE IS USED TO CHECK FOR A BUS TIME-OUT TRAP (004 TRAP) 

34 WHICH IS CAUSED BY AN ACCESS TO A NON-EXISTENT MEMORY OR I/O LOCATIOF:. 
3% IF THE TRAP DOES NOT OCCUR, THIS ROUTINE RETURNS A SUCCESS INDICATION. 
3* 

3* INPUTS: RO - SOURCE ADDRESS FOR MOVE. 

3% R1 - DESTINATION ADDRESS FOR MOVE. 

34 CRO) - SOURCE FOR THE MOVE. 

3% 

3*@ OUTPUTS: (R1) - WRITTEN TO THE CONTENTS OF (RO). 

34 CARRY FLAG - SET ON RETURN IF NO 004 TRAP DETECTED. 

3% TP4FLG - NONZERO IF TRAP OCCURRED, CLEARED OTHERWISE. 

3% 


s# CALLING SEQUENCE: JSR 


# 
3 COMMENTS: 


PC ,.CKTRAP 


IF THIS SUBROUTINE CAUSES A TRAP, EITHER THE ADORESS WHICH 
TS LABELED ADRPTR WILL BE THE TRAP PC ADDRESS ON THE STACK. 


3 
3 SUBORDINATE ROUTINES CALLED: NONE. 


ZASHAAAHKHEHAGCMEEOHKAEAEGREEAAADEHESHERADEKEDREEELAEREACERREEEEEARAEREKOBAEEREAHRAKS 


CKTRAP:: SAVE 


CLR 
MOV 
ADRPTR:: TST 
SEC 
BEQ 
CLC 
60%: PASS 


sSAVE CONTENTS OF GPRS RO THRU RS. 
+PREGOS sCALL REGISTER SAVE SUBRT. 
;CLEAR THE 004 TRAP FLAGS. 


TP4FLG 

CRO), CR1) i PERFORM THE MOVE IN QUESTION. 

TP4FLG sCHECK FOR OF TRAP. 
sINDICATE SUCCESS. 

608 VEXIT WITH SUCCESS IF TRAP DID NOT OCCUR. 
S INDICATE FAILURE. 
sRESTORE GPRS. 


JSR PC, @CSP)-+ sRETURN TO PREGOS SUBRT. 


PC 


J7 
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GOBAL SUBROUTINE CKTRPB 
3300 -SBTTL GOBAL SUBROUTINE - CKTRPB - 
3301 FAASAHAKASARASSEAAAAESERARESALESEASEEEEASEASEEERELEAESEAEEESEEEAEEEEESEEEEEEEEREDEES 
3302 34 - CHECK FOR TRAP - 
3303 3% THIS SUBROUTINE IS USED TO CHECK FOR A BUS TIME-OUT TRAP (004 TRAP) 
3304 3% WHICH IS CAUSED BY AN ACCESS TO A NON-EXISTENT MEMORY OR I/0 LOCATION 
sone 34 IF A TRAP DOES NOT OCCUR, THIS ROUTINE RETURNS A SUCCESS INDICATION. 
3% 
3307 34 INPUTS: RO - SOURCE ADDRESS FOR MOVE 
3308 +4 Ri - DESTINATION ADDRESS FOR MOVE 
tH :* CRO) - SOURCE FOR THE MOVE 
7% 
3311 34 OUTPUTS: (R1) - WRITEN TO THE CONTENTS OF (RO) 
3312 3% CARRY FLAG - SET ON RETURN IF NO 004 TRAP DETECTED 
4 34 TP4FLG - NONZERO IF TRAP OCCURED, CLEARED OTHERWISE. 
3% : 
tH 34 CALLING SEQUENCE: JSR PC,.CKTRPB 
34 
3317 34 COMMENTS : IF THIS SUBROUTINE CAUSES A TRAP, EITHER THE ADORESS 
3316 34 WHICH IS LABELED TRPAD2 WILL BE THE TRAP PC ADDRESS ON 
3319 3% THE STACK OR SOME OTHER ye ee WHICH WAS PLACED ON 
3320 34 THE STACK BY AN UNEXPECTED TRAP 
cose 34 THIS ROUTINE PERFORMS A BYTE MOV . 
3* 
3323 3% SUBORDINATE ROUTINES CALLED: NONE . 
sacs 2 SRAPOKAKEARHARREEEAAEALHKEMRHRAECAAEESHEOBRAEBREEEAKALERHAEREEHEAEEREREDEREARRHHAADRES 
3326 017400 CKTRPB: : SAVE 
5307 017400 004567 165720 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
3328 017404 005067 162644 CLR TP4FLG sCLEAR THE 004 TRAP FLAGS 
3329 017410 111011 MOVB (RO),CR1) sPERFORM THE BYTE MOVE 
3330 017412 005767 162636 TRPAD2:: TST TP4FLG sCHECK FOR OCCURENCE OF TRAP 
3331 017416 000261 SEC sINDICATE SUCCESS 
3332 017420 00140). BEQ 60% sEXIT WITH SUCCESS IF TRAP DID NOT OCCUR 
3333 017422 000241 CLC sINDICATE FAILURE 
3334 017424 608: PASS 3 
017424 004736 JSR PC, @CSP)+ sRETURN TO PREGOS SUBRT. 
3335 017426 000207 RTS PC sRETURN 


IK 7 
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GLOBAL SUBROUTINE CLNRST 


017430 
017430 


017434 
017440 


017442 
017446 
017446 
017446 


017450 


004567 


004767 
103002 


004767 


004736 
000207 


165670 


004510 


003274 


-SBTTL GLOBAL SUBROUTINE - CLNRST - 

ama CE OO eg gn eg ~~ ems 
34 CLEAN RESET OF THE DEVICE UNDER TEST - 

34 THIS SUBROUTINE IS USED TO RESET THE DUT TO A KNOWN STATE. 

34 un tc -TEST IS SKIPPED,AND THE FIFO IS PURGED OF ANY ERROR 
3* 

3% IF THE RESET DOES NOT SUCCESFULLY COMPLETE, THEN THE CARRY BIT IS 

34 PASSED BACK TO THE CALLING ROUTINE (CLEAR). 

34 

3* INPUTS: CSRA - CONTAINS THE ADDRESS OF THE CSR 

34 TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 
34 ERRNBR - ERROR NUMBER FOR POSSIBLE ERROR REPORT 

34 ERRTBL- ERRTYP,ERNBR,AND ERRMSG SET UP CORRECTLY. 

3% 

3# OUTPUTS: THE DUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 

3% CARRY - CLEAR INDICATES THE TEST IS TO BE ABORTED. 

34 ERRBLK - VALUE MAY BE DESTROYED. 

3% IESTAT - TX AND RX INTERRUPT FLAGS ARE CLEARED. 

3% TX AND RX INTERRUPT ENABLE BITS IN THE DUT'S CSR ARE CLEARED. 


* 
s# CALLING SEQUENCE: JSR PC,CLNRST 


* 
3 COMMENTS: THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS ERRNBR. 
73 THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 


3% 
3@ SUBORDINATE ROUTINES CALLED: DELAY,MSLGET,PUFIFO,RESETT. 
8 SHSHSSHSSSALASSHSSSHKSESEEESSESEASAEEEAESESEREAEESESESEOKEAEEEEEEEOESEEEEEEEEEEEEE 


CLNRST:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


; "RESET THE DUT. 
s THIS ROUTINE REPORTS ERRORS WITH NUMBERS FROM ERRNBR THRU ERRNBR+2. 
t- 


JSR —s PC RESETT ;RESET THE DUT TO A KNOWN STATE 
Bcc OO C«C6 OS tEXIT ROUTINE WITH ABORT TEST INDICATOR. 
7 
} PURGE THE FIFO OF ERROR CODES, SAVE ANY BMP CODES FOUND. 
, JSR _—s- PC, PUF IFO ;PURGE THE FIFO. 
608: ,EXIT THE TEST USING RESETT OR PUFIFO STATUS. 
PASS TRESTORE GPRS, PASS THE FOLLOWING INTACT: 
JSR —s- PC, (SP > ;RETURN TO PREGOS SUBRT. 


sCARRY BIT: IF CLEAR, THEN ABORT THE TEST. 
RTS PC 


SEQ 88 


L7 
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GLOBAL SUBROUTINE CLR16W 


017472 


004567 165646 
012701 000020 
005020 


095301 
001375 


004736 
000207 


-SBTTL GLOBAL SUBROUTINE - CLRiI6W - 

FOF RRAAKAHHAAHAAAAAREAEAAEEAREEESEEASEEEREARARERERESEEBARESREEAREROESEAEAEEERESREESED 
34 - CLEAR SIXTEEN WORDS ROUTINE 

34 THIS SUBROUTINE CLEARS 16 WORDS STARTING WITH THE SPECIFIED WORD. 
3% 

3* INPUTS: RO - ADDRESS OF THE FIRST WORD TO CLEAR. 

3% 

3* OUTPUTS: (RO) TO CRO+1S) - 16 WORDS OF MEMORY ARE CLEARED TO 0. 
3% 

3@ CALLING SEQUENCE: JSR PC,CLR16W 

3% 

3# COMMENTS: 


3% 
3# SUBORDINATE ROUTINES CALLED: NONE. 


Br — SRHSAKEASASASSSASASASASHSEASEEASASAEREASEAEEE*EASESEAEEAEOEEEEEEEEEEEEEEEEEEED 


CLR16W:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS , PREGOS sCALL REGISTER SAVE SUBRT. 
MOV #16.,Ri | SET THE LOOP COUNTER TO 16. 
2s: CLR CRO)+ sCLEAR A WORD OF MEMORY. 
DEC R1 ' sCOUNT THIS LOOP. 
BNE 2s ; sLOOP IF NOT 16 WORD CLEARED. 
60$: PASS Peggy Bn GPRS. 
ars ec JSR PC, @CSP)+ sRETURN TO PREGOS SUBRT. 


M7 
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GLOBAL SUBROUTINE CONMAP 
3406 -SBTTL GLOBAL SUBROUTINE - CONMAP - 
3407 FOF SRARAKAAAREKAADALASAEEEAEREAAEEEEEADESAREREEELEAAREREEEAEEEEEESEAEAERKERDERSE 
3408 7% - CONVERT LINE BIT MAP, 
3409 74 THIS SUBROUITNE IS USED TO CONVERT A BIT MAP PASSED TO IT , INTO 
3410 34 ANOTHER LINE BIT MAP THAT IS BASED UPON THE ASSOCIATED TX/RX LINE 
sare 34 NUMBER/OFFSET TABLE. 
3% 
3413 3 INPUTS: RS - CONTAINS THE LINE BIT MAP TO BE TRANSFORMED. 
tet 3 TXRXLB - BASE ADORESS OF ASSOCIATED TX/RX LINE NUMBER TABLE. 
1 3% 
cart 3 OUTPUTS: RS - CONTAINS AN ASSOSCIATED LINE BIT MAP. 
3% 
ot 3# CALLING SEQUENCE: JSR PC, CONMAP 
3% 
3420 3@ COMMENTS: THE TX/RX ASSOCIATION TABLE MUST BE INITIALISED BEFORE THIS 
oa23 . ROUTINE IS CALLED. 
3423 o SUBORDINATE ROUTINES CALLED: NONE. 
3424 B-— SPHHHEAASSESSHSSAASEASASEESEAESSASESESEEAEHEREEESEESSEEEEESESEEEEDEEEEEEEEEEEE 
3425 
3426 017474 CONMAP : : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
017474 004567 165624 JSR RS , PREGOS sCALL REGISTER SAVE SUBRT. 
3427 017500 012702 005234 MOV @TXRXLB,R2 1GET THE BASE ADDRESS OF THE LINE ASSOC TABLE. 
3428 017504 010503 MOV RS,R3 3sCOPY Rm... BIT MAP re BE TRANSFORMED. 
3429 017506 012704 000020 MOV ONUMLNS , R4 sSET MAX LINE COUNTER 
3430 017512 005005 CLR RS sCLEAR ASSOCIATED LINE BIT MAP 
3431 017514 006203 2s: ASR R3 sSHIFT ACTLNS BIT MAP INT BOOLEAN REGISTER. 
3432 017516 103005 BCC 4 sSKIP SETTING ASSOCIATED LINE NUMBER BIT MAP. 
3433 017520 011201 Vv CR2),R1 sGET ASSOCIATED LINE NUMBER OFFSET FROM TABLE. 
3434 017522 006201 ASR R1 s SHIFT pd TO GET LINE NUMB FROM OFFSET. 
3435 017524 004767 001250 JSR PC,LINBIT sGENERATE AN SINGLE BIT MAP FOR THIS LINE. 
3436 017530 050005 BIS RO,RS iSET BIT FOR THIS LINE IN ASSOCIATED BIT MAP. 
3437 017532 005722 4%: TST CR2)+ s INCREMENT ADORESS FOR THE NEXT LINE NUMBER. 
3438 017534 005304 DEC R4 sDECREMENT LINE COUNT. 
3439 017536 001366 2s sLOOP IF NO P 
3440 017540 608: PASS RS sRESTORE GPRS, EXCEPT 
017540 010566 000014 MOV RS, RSSLOTC( SP) sPUT RS IN STACK SLOT. 
017544 004736 JSR PC,@CSP)+ sRETURN TO a ne 


3441 RS - CONTAINS THE ASSOCIATED LINE BIT MAP 
3442 017546 000207 RTS PC 


N7 
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GLOBAL SUBROUTINE - DELAY - 


3444 -SBTTL GLOBAL SUBROUTINE - DELAY - 

3445 een eaeeeeeeemneeuenemeane--" ~*~" ~~ eae 
3446 i* DELAY wg hoy - 

3447 34 THIS SUBROUTINE IS USED TO DELAY A VARIABLE NUMBER OF MILLI-SECONDS. 


* 
3449 :* INPUTS: R4 - CONTAINS THE NUMBER OF MS TO DELAY. 
MSLCNT. 


3% 
3452 3* OUTPUTS: NONE . 
;* 
3454 3* CALLING SEQUENCE: JSR PC ,DELAY 


3% 
3456 3* COMMENTS: IF NO HARDWARE CLOCK INTERRUPTS ARE a knee CONTROL-CS WILL 
3457 3% NOT BE HONORED FOR THE DURATION OF THE DELA 


3% 
3459 3# SUBORDINATE ROUTINES CALLED: NONE. 
3460 F SAARAASAREASSALALSEEESLEALADAAAAAEEASESALESSEBARSHASAESASESESESSESSESESEASEEEAREEEAEDRE 


3462 017550 DELAY:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

017550 004567 165550 JSR RS, PREGOS sCALL REGISTER SAVE SUBRT. 
3463 017554 010401 MOV R4,R1 sPASS NUMBER OF MS DELAY AS TIME-OUT VALUE. 
3464 017556 012702 177777 MOV #-1,R2 sTELL MSLOOP ROUTINE TO CHECK ALL BITS. 

3465 017562 005003 CLR R3 sTELL MSLOOP RTN TO CHECK FOR ALL BITS CLEAR. 
3466 017564 012704 017606 MOV 062% ,R4 sTELL MSLOOP TO CHECK DUMMY NON-ZERO WORD. 
3467 017570 004767 001506 JSR PC ,MSLOOP sDELAY THE REQUESTED @ OF MS. 

3468 017574 103002 BCC 60% sEXIT ROUTINE IF WE TIMED-OUT.]) 

3469 017576 004767 002314 JSR PC ,OOPS sIF NO TIME-OUT, BAD PROGRAM OR HOST MACHINE. 
3470 017602 60$: PASS sRESTORE GPRS. 


017602 004736 JSR PC ,.@(SP)-+ sRETURN TO PREGOS SUBRT. 
3471 017604 000207 RTS PC 


3473 017606 177777 62%: -WORD -1 sDUMMY, NON-ZERO WORD. 


8 CO 


be 
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3475 -SBTTL GLOBAL SUBROUTINE - DM16B - 
3476 gee alee OO a ae ag oo em ge ooo ett ene: 
3477 3¢ CONVERT TO A 16-BIT PHYSICAL ADDRESS - 
3478 3¢ THIS ROUT INE CONVERTS FROM PAR FORM TO A 16-BIT PHYSICAL ADDRESS, 
ote :¢ OF ALTERNATE 1‘S AND O'S. 
80 4 
ee ie INPUTS: OMTSTA: - CONTAINS THE ADDRESS IN PAR FORM 
ye 
os 3¢ OUTPUTS: RO - CONTAINS THE 16 BIT PHYSICAL ADDRESS 
3¢ 
pees 36 CALLING SEQUENCE: JSR PC ,0M168 
34 
aed 36 COMMENTS: USED IN THE OMA ADDRESS TEST 
34 
3489 3¢ SUBROUTINES CALLED: 
3490 t-- OOO OOOOOOOEOEEEEENEOO60400060600000060000000000000000000000000000000000 
3491 
3492 017610 OM168:: SAVE 
017610 004567 165510 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
3493 017614 016700 162402 MOV OMTSTA,RO SHIFT THE OMA TEST ADDRESS 
3494 017620 012702 000006 MOV #6 ,R2 sSIX PLACES LEFT , TO 
3495 017624 006300 2s: ASL RO sCONVERT IT INTO A , 
3496 017626 005302 DEC R2 316-BIT PHYSICAL ADORESS 
tad 017630 001375 BNE 2s 3 
3499 017632 012701 MOV #52,R1 sSET UP THE 6 LSB'S 
3500 017636 032700 000100 BIT #100,RO sIF BIT @6 OF THE PHYSICAL 
3501 017642 001402 BEQ & sADORESS IS CLEAR THEN BRANCH 
coor 017644 012701 000025 MOV #25,R1 sOTHERWISE CORRECT THE LSB’'S 
os 017650 060100 4%: ADO R1,RO sMREGE THE LSB‘S WITH THE PHY ADOR 
3506 017652 PASS RO sRETURN WITH THE PHY ADDR. 
017652 010066 000002 MOV RO,ROSLOT( SP) sPUT RO IN STACK SLOT. 
017655 004736 JSR PC, 8(SP)-> sRETURN TO PREGOS SUBRT. 
coon 017660 000207 RTS PC 


C8 
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GLOBAL SUBROUTINE 0M168 
3510 
3511 -SBTTL GLOBAL SUBROUTINE - DMRW - 
3512 BOF SHESHEKEHSAEEEESESESEEEAEEASESEEEEESESCEEEEEEEEEAEASESEREEESESEEEEECAEEESEEEEEES 
3513 3¢ - READ/WRITE DATA FROM/TO COMTSTA) - 
3514 14 THIS ROUTINE READS DATA BYTES FROM OR WRITES DATA BYTES TO AN ADOR OF 
3515 14 ALTERNATE 1'S AND O'S . BITS 21 TO 6 4 THE ADOR ARE CONTAINED AT 
3516 34 DMTSTA. THE ROUTINE APPENOS THE 6 LSB’S TO PRODUCE AN ADOR OF 
44 i* ALTERNATE 1'SAND 0’S. THIS ROUTINE TS CALLED FROM THE DMA ADDRESS TEST. 
1 34 
3519 s@ INPUTS: RO - ADDRESS OF THE DATA TO BE WRITTEN TO (OMTSTA), 
3520 :¢ IF A WRITE IS SPECIFIED. 
3521 i¢ Ri - ADORESS OF THE AREA IN WHICH | bil = COMTSTA), 
3522 ie IS TO BE SAVED, IF A READ IS SPECIF 
3523 1e R3 - NUMBER OF DATA BYTES TO BE READ /WRITTEN 
3524 3¢ RS - CLEAR , SPECIFIES A READ FROM (OMTSTA) c 
3525 i¢ SET , SPECIFIES A WRITE TO (DMTSTA). 
3526 +4 DMTSTA - CONTAINS BITS 21 TO 6 OF THE ADOR. 
3527 i¢ MMSRO - ADORESS OF MEM MGT STATUS REG 00 
3528 :¢ MMPRES - BIT #0 SET, poy MEM MGT PRESENT 
3529 36 PARAS - ADORESS OF MEM MGT 3 
tng 34 TP4FLG - 004 TRAP FLAGS 
1 34 
3532 3 OUTPUTS: DATA AT COMTSTA) SAVED OR WRITTEN 
3533 Tt) PAR @3 - CONTENTS SET TO CONTENTS OF OMTSTA 
3534 3¢ TP4FLG - CLEAR IF READ/WRITE SUCCESSFUL 
3535 36 SET IF FAIL. 
3536 3% 
oo s@ CALLING SEQUENCE: JSR PC .OMRW 
34 
3539 3¢@ COMENTS: IF MEM MGT IS PRESENT THE SUBROUTINE USES (OMTSTA) 
3540 34 AS THE PAGE ADORESS , PLACING IT IN PAR @3, AND CREATES 
3541 3¢ A VIRTUAL IN THE RANGE OF PAR @3 WHICH CONTAINS 
3542 36 THE SIX LSB8'S 
3543 :¢ IF IT IS NOT PRESENT THE (OMTSTA) IS CONVERTED INTO 
ope 34 THE EQUIVALENT 16 BIT PHYSICAL ADDRESS. 
34 
3546 s@ SUBORDINATE ROUTINES CALLED: CKTRAP,DM168. 
Sod B-~— SSEHSEESHESSSESSSSESOSSEHESSESESSEESEEEEHSSESESEHHHOSHSASEEHOSEEEEEEEESEEESEEE 
3549 017662 OMRW:: SAVE 
ease 017662 004567 165436 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
3551 017666 010004 MOV RO,R4 sSAVE THE SOURCE ADOR 
3552 017670 005767 162424 TST MMPRES sIF MEM MGT IS PRESENT THEN 
3553 017674 001003 BNE 6% sJUMP AND SET UP THE PAR @3 
3554 017676 004767 177706 JSR PC .OM168 1 OTHERWISE CONVERT DMTSTA INTO A 16-BIT 
3555 sPHYSICAL ADDRESS, IN RO. 
3556 017702 000416 BR 108 s JUMP TO PERFORM THE MOVE 
3557 017704 016777 162312 162420 6%: MOV OMTSTA,GPARSA 1SET PAR #3 
3558 017/12 012700 060052 MOV #60052 ,RO sSET THE SIX LSB‘'S AND CONVERT TO 
as * i ADORESS WITHIN THE INFLUENCE 
a 
3561 017716 032767 000001 162276 BIT @1,OMTSTA sIF BIT 0 OF DMTSTA IS _— THEN 
3562 017724 001402 BEQ 86 sAVOID CHANGING THE LSB'S 
3563 017726 012700 060025 MOV #60025 , RO sCHANGE THE LSB‘S 
3564 017732 012777 000001 162354 8%: MOV @6ITO, GMMSRO sENABLE MEM MGT. 
3565 017740 005705 108: TsT RS sIF A READ IS SPECIFIED THEN 
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017742 
017744 


177424 


162326 
162314 


128: 


148%: 


168%: 
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JSR 


a SWAPING THE SOURCE AND DESTINATION. 
a 

sRESTORE THE ORIGINAL SOURCE FOR THE MOVE. 
sPERFORM THE BYTE MOVE. 

sEXIT IF A TRAP OCCURED. 

sINCREMENT THE SURGE Aboe. ADORESS 


sREPEAT UNTIL ALL DATA — 
1 MEM MGT IS PRESENT T 
;DISABLE IT. 


PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 
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SEQ 95 


3582 -SBTTL GLOBAL SUBROUTINE - DODMA - 
3583 BOF SESHHSHHEHAASESSEEAEAEEEEEEEEEEEHAEAEEEEEEEEEEEEEEEAAEHREEEREREDREEEEEEEEEEEES 
3584 34 - INITIATE DMA TRANSMISSION ROUTINE - 
3585 +4 THIS ROUTINE WRITES THE DMA PARAMETER TO THE SPECIFIED DEVICE AND 
coat 34 INITIATES THE DMA TRANSMISSION. 
34 
3588 3* INPUTS: Ri - LINE NUMBER ON WHICH TO INITIATE THE DMA. 
3589 ya R2 - START ADDRESS OF THE DMA > mre . 16 BIT VIRTUAL). 
3590 34 R3_ - CHARACTER COUNT OF THE OMA BUFFE 
3591 3% CSRA - CONTAINS ADDRESS OF THE DUT CSA. 
3592 34 IESTAT - STORAGE FOR STATES OF THE INTERRUPT ENABLE BITS. 
3593 34 TXAD1A - CONTAINS ADORESS OF DMA TX BUFFER ADDRESS REG ¢1. 
3594 34 TXAD2A - CONTAINS ADORESS OF DMA TX BUFFER ADDRESS REG ¢2. 
coon 3% TXBFCA - CONTAINS ADORESS OF DMA CHARACTER COUNT REGISTER. 
3% 
3597 3@ OUTPUTS: CARRY - SUCCESS FLAG (SET IF DMA_START FOUND CLEAR). 
3598 34 DUT TBUFFAD1 - LS 16 BITS OF DMA BUFFER ADDRESS CINITIALIZED). 
3599 34 DUT TBUFFAD2 - MS 6 BITS OF DMA BUFFER ADDRESS CINITIALIZED), 
3600 34 OMA_START BIT SET. 
3601 34 DUT TBUFFCT - DMA BUFFER CHARACTER COUNT ( INITIALIZED). 
3602 34 
3603 3@ CALLING SEQUENCE: JSR PC ,DOOMA 
3604 3% 
3605 3@ COMMENTS: THIS ROUTINE ASSUMES MEMORY MANAGEMENT IS DISABLED AND 
3606 34 CLEARS THE TWO MSB OF THE DMA ADDRESS, I.E. BITS O AND 1 
3607 34 OF THE TBUFFAD2 REG. 
3608 3% 
3609 s@ SUBORDINATE ROUTINES CALLED: NONE. 
neon 87 - 9886066660066666466066666666666060666666060668666666666666666666400606606060666666886 
i1 
3612 020004 DOOMA:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

020004 004567 165314 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
pees 020010 012704 000200 MOV #200 ,R4 sPREPARE TO CLEAR UPPER 6 BITS OF DMA BUFF ADR. 
3615 
3616 ; * RITE THE DMA PARAMETERS OUT TO THE DUT DMA REGISTERS. 

3617 8 OISABLE INTERRUPTS. 
3618 3 SET UP DUT CSR IND.ADR.REG FIELD. 
3619 P WRITE THE OMA TRANSMIT CHARACTER COUNT. 
i WRITE THE LEAST SIGNIFICANT 16 BITS OF THE OMA BUFFER START ADDRESS. 
3621 3 WRITE THE MOST SIGNIFICANT 6 BITS OF THE ADDRESS, 
aeee 8 SETTING THE DMA_START BIT, AND INITIATING THE OMA TRANSMISSION. 
ad 
3624 020014 6%: GETPRI RS sGET THE PRESENT PROCESSOR PRIORITY. 
020014 104440 TRAP CSGPRI 
020016 010005 MOV RO.RS 
SETPRI @PRIO7 sDISABLE ALL HAROWARE INTERRUPTS. 
012700 000340 MOV @PRIO7,RO 
104441 CsSPRI 
056701 162202 BIS IESTAT,R1 sPREPARE FOR SETUP OF LINE IN DUT CSR 
3627 020032 010177 162142 “Ov R1,8CSRA sSET UP THE DUT CSR IND.ADR.REG FIELD. 
3626 020036 105777 162152 TSTB @TXAD2A sTEST THE DUT OMA_START BIT. 
3629 020042 000241 CLC sINDICATE FAILURE IN CASE DMA.HO BIT IS SET. 
3630 020044 10041 BMI 60% sEXIT WITH FAILURE IF OMA.HO BIT IS SET. 
3631 020046 010377 162144 MOV R3,8TXBFCA sWRITE THE OMA CHARACTER COUNT. 
3632 020052 010277 162134 MOV R2,@TXADIA sWRITE THE LS 16 BITS OF BUFFER ADDRESS. 
3633 020056 110477 162132 MOVB R4,@8TXAD2A sWRITE MS 6 BITS OF ADR AND START OMA TX. 





GLOBAL SUBROUTINE 


3634 020062 SETPRI RS sRESTORE THE PROCESSOR PRIORITY. 
020062 010500 MOV RS,RO 
020064 104441 TRAP C$SPRI 
oooe 020066 000261 SEC sINOICATE SUCCESS. 
3637 020070 60$: PASS sRESTORE GPRS, 
020070 004736 JSR PC,.@CSP)-+ sRETURN TO PREGOS SUBRT. 
3638 020072 000207 RTS PC s CARRY - SUCCESS FLAG (SET IF SUCCESS). 


F8 | 
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GLOBAL, SUBROUTINE 


165224 


000014 


G8 


SEQ 97 


-SBTTL GLOBAL SUBROUTINE 


BOF SHEAKESESESEEAAESASAESEEEAESESAREEEEEESSAREEEEEEAEEEAEEEEREREELESEEESEEEAEEED 


- FINACT - 


- FINO FIRST ACTIVE LINE - 


34 THIS SUBROUTINE CALCULATES THE NUMBER OF THE FIRST ACTIVE LINE THAT 
1% IS FOUND IN THE ACTIVE LINE BIT MAP ACTLNS. 

34 

3* INPUTS: ACTLNS - CONTAINS THE ACTIVE LINE BIT MAP. 

34 

3# OUTPUTS: R1 - CONTAINS THE NUMBER OF THE FIRST ACTIVE LINE. 

34 RS - CONTAINS THE BIT MAP REPRESENTATION OF THE ACTIVE LINE. 
fs CARRY SET INDICATES SUCCESS. 

34 


3@ CALLING SEQUENCE: JSR 


r 
3 COMMENTS: 


PC,FINACT 


3% 
3@ SUBORDINATE ROUTINES CALLED: NONE. 


B-— SHHASSSSHSSHSASSSSASSESESESASSEHEEAEEAESEEEASSEEESESEEEEEEEEEEEEEESEEEEEEEEEESEEED 


FINACT:: SAVE 


3¢ 


sSAVE CONTENTS OF GPRS RO THRU RS. 
RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


s FIND AN ACTIVE LINE ON WHICH TO PERFORM THE TEST. 


2s: BIT 
8 


RTS 


JSR 
Ri 
@NUMLNS RS 
ACTLNS,RO 
#1,R5 
RS,RO 
ae 
RS 
R1 
R1,R3 
es 
60% 
R1,R5 
MOV 
MOV 
JSR 


PC 


sCLEAR THE LINE NUMBER COUNTER. 
sGET MAX LINE NUMBER. 
sGET THE ACTIVE LINE BIT MAP. 
sSET UP A LINE BIT 
sLOOK FOR AN ACTIVE LINE. 
sBRANCH TO BEGIN TEST IF A LINE HAS BEEN FOUND. 
sSHIFT THE BIT MASK FOR THE NEXT LINE. 
. ae THE LINE NUMBER COUNTER. 
CK IF ALL LINES HAVE BEEN TRIED. 
sLOOP TO TRY THE NEXT LINE. 
sCLEAR CARRY BIT, NO ACTIVE LINE FOUND. 
sEXIT WITH FAILURE. 
iSET CARRY, SUCCESS. 


sRESTORE GPRS, EXCEPT 
R1,RISLOTCSP) 
—_ 
4 + 
sR1 - CONTA 


sRS_- CONTAINS THE BIT MAP OF THE 
sCARRY - SET INDICATES SUCCESS. 


sPUT R1 IN STACK SLOT. 
sPUT RS IN STACK SLOT. 
sRETURN TO PRE 


ACTIVE LINE. 


GOS SUBRT. 
INS THE NUMBER OF FIRST ACTIVE LINE. 


ee ee ee ee ee ee oe 
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GLOBAL SUBROUTINE RPSUP 
3683 -SBTTL GLOBAL SUBROUTINE - FRPSUP - 
3684 2H SHEHHAEHARHSASAASASASASASESOSESLESESEEEAEEASREEEEAEASEEESESEEEESEESESEERESEEEAEEE 
a4 34 - FRAMING AND PARITY ERROR TRANSMISSION/RECEPTION SET-UP - 
3* 
3687 3% THIS ROUTINE IS USED TO INITIALISE BOTH THE DUT AND THE 
3688 34 TRANSMISSION/RECEPTION CONTROL PARAMETERS TO THE CORRECT 
3689 34 STATE, PRIOR TO A FRAMING OR PARITY ERROR DETECTION AND 
sty 34 REPORTING TEST. 
34 
3692 3@ INPUTS: RO - LPR CONTENTS FOR LINES IN THE BIT MAP IN GPR4. 
3693 34 R1 - LPR CONTENTS FOR LINES NOT IN THE BIT MAP IN GPR4. 
3694 34 R2 - START ADORESS OF DATA PATTERN TO TRANSMIT. 
3695 34 R3 - LENGTH OF THE DATA PATTERN TO TX. 
3696 34 R4 - LOCAL LINE GROUP BIT MAP. 
3697 34 ACTLNS - CONTAINS A BIT MAP OF ALL CURRENTLY ACTIVE LINES. 
3698 34 LOPBCK - CONTAINS THE TYPE OF LOOPBACK MODE SELECTED. 
ated :* CBB - LABEL AT BASE OF TX/RX CONTROL BLOCK. 
34 
3701 3# OUTPUTS: THE CONTENTS OF THE TXRCB ARE DESTROYED. 
3702 34 THE INDIRECT ADDRESS FIELD OF THE DUT CSR MAY BE DESTROYED. 
3703 3% THE DUT’S LPR‘'S AND LNC’S MAY BE MODIFIED. 
3704 34 THE FOLLOWING POINTERS AND COUNTERS ARE INITIALISED; 
3705 3# CHCNT,,.CHRTOT, vom OPLEN.EXCNT ,RXCNT,,.RXDONF ,RXPTR, TXCNT, 
sree 34 TXDONF , TXPTR, TXRXL 
3% 
ds. 4 3 CALLING SEQUENCE: JSR PC, FRPSUP 
3% 
3710 3@ COMMENTS: THIS ROUTINE SHOULD BE CALLED TWICE DURING THE TESTING OF 
3711 3% THE FRAMING AND PARITY ERROR DETECTION AND REPORTING TEST. 
3712 3% SO THAT BOTH LINE GROUPS ARE TESTED ON TRANSMISSION AND 
3713 34 RECEPTION. 
3714 34 JSR PC,FRPSUP 3; 0O SET-UP. 
3715 34 EXECUTE TEST FOR THE ABOVE SET-UP. 
3716 34 COMPLEMENT THE LINE GROUP BIT MAP. 
3717 34 JSR PC,FRPSUP 300 SET UP AGAIN. 
4 3% EXECUTE TEST AGAIN. 
ye 
3720 3* SUBORDINATE ROUTINES CALLED: TXRINI. 
eres 8B -— SHHSSHSHSSSESSSSSSSSASASSSSSEASASSESSAHAESSASEESSSESASEEEEHEEEESEKEEESEEESEEED 
3723 020154 FRPSUP:: SAVE sSAVE THE CONTENTS OF THE GPR'S. 
020154 004567 165144 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
3724 020160 010067 000230 MOV RO, 70% 1 SAVE LPR PARAMETER FOR LINE TX 
Sree 020164 010167 000226 MOV R1, 72% sSAVE LPR PARAMETER FOR LINE RX. 
a¢ 
3727 s SET UP THE TRANSMISSION/RECEPTION CONTROL BLOCK TO INITIALISE THE 
hag s ACTIVE LINES IN THE BIT MAP PASSED INTO THIS ROUTINE. 
3730 020170 010067 162726 MOV RO, CBB sSET CONTENTS OF LPR PARAMS IN TX/RX C.BLK. 
3731 020174 012700 003124 MOV @CBB+2,RO0 sGET ADORESS OF THE NEXT WORD IN THE CNTRL BLK 
020200 012720 000004 MOV @4,(RO)+ sLNCTRL PARAMETER, ENABLE RECEIVERS. 
3733 020204 010220 MOV R2,CRO)D> sSTART ADORESS OF DATA igen 
3734 020206 010320 MOV R3,CRO)+ SSET DATA PATTERN LENGTH 
3735 020210 012720 000001 MOV #1,CRO)+ sNUMBER OF DATA PATTERNS. TO TRANSMIT. 
3736 020214 016710 161752 MOV ACTLNS, CRO) s8IT MAP OF LINES TO INITIALISE. 
3737 020220 005104 COM sGENERATE A BIT MAP OF ACTIVE LINES IN GRP1. 
3738 020222 040420 BIC Ra. CROD* sCLEAR THE UNWANTED LINES. 


18 
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GLOBAL SUBROUTINE RPSUP 

3739 020224 116720 161744 MOVB LOPBCK,(RO)+ sSET LOOPBACK MODE ,STAGGARED. 
3740 020230 005200 INC RO s INCREMENT ADDRESS TO GET NEXT WORD IN TABLE. 
Lat 020232 012710 000001 MOV #1,(RO) sSET AMMOUNT OF OFFSET FOR EACH TX START. 
3743 
3744 ; ” INITIALISE THE DUT AND THE ASSOCIATED POINTERS AND erty TO THE STATE 
Lae s DICTATED BY THE CONTENTS OF THE TX/RX CONTROL BLOCK 

ge 
Lad 020236 004767 005534 JSR PC, TXRINI sINITIALISE OUT. 

36 
dead ; SET UP CONTROL BLOCK FOR LINES IN GROUP 2. 

s* 
3751 020242 012700 003122 MOV @CBB ,RO sGET START ADDRESS OF CONTROL BLOCK. 
3752 020246 010120 MOV R1,CRO)+ sSET LPR PARAMETER FOR RX LINES. 
3753 020250 062700 000010 ADD #10,RO sSELECT THE ADORESS OF THE LINE BIT MAP IN C.B. 
3754 020254 016710 161712 MOV ACTLNS, (RO) iBIT MAP OF LINES TO INITIALISE. 
3755 020260 005104 COM Ra sGENERATE A BIT MAP OF LINES IN GRP 2. 
Le 4 020262 040410 BIC R4,CRO) sCLEAR THE UNWANTED LINES. 

se 
3758 s INITIALISE THE DUT AND THE ASSOCIATED POINTERS AND COUNTERS, TO THE STATE 
144 s DICTATED BY THE CONTENTS OF THE TX/RX CONTROL BLOCK. 

2” 
da! 020264 004767 005506 JSR PC, TXRINI sINITIALISE DUT. 
3763 . 
3764 : SET-UP THE REQUIRED LPR PARAMETERS NEEDED FOR THE CORRECT RECEPTION OF DATA 
bay s ON ASSOCIATED IN-ACTIVE LINES. 

g= 
3767 3¢ 
tae s INITIALISE LPR PARAMETERS FOR INACTIVE LINES IN GROUP 2. 

g° 
3770 020270 012701 177777 MOV @MAPLNS ,R1 sSET UP BIT MAP CORRESPONDING ~ ALL LINES. 
3771 020274 016702 161672 MOV ACTLNS ,R2 sGET THE ACTIVE (TX) LINE BIT MAP 
3772 020300 005101 COM Ri sGENERATE A BIT MAP OF NONE EXISTANT LINES. 
3773 020302 005102 COM R2 ey A BIT MAP OF INACTIVE LINES. 
3774 020304 040102 BIC R1,R2 sCLEAR ANY “NONE EXISTANT” INACTIVE LINES. 
3775 020306 040402 BIC R4,R2 $ 
3776 020310 010267 162620 MOV R2,CBMAPA sSET UP BIT MAP IN CONTROL BLOCK. 
3777 020314 005067 162612 CLR CBDPNA sCLEAR REPEAT TX COUNT IN CONTROL BLOCK. 
3778 020320 016767 000072 162574 MOV 72¢ ,CBLPRA sSET-UP COMPLEMENTARY LPR PARM. 
dag 020326 004767 005444 JSR PC, TXRINI sINITIALISE INACTIVE LINES. 

+ 

crs : INITIALISE LPR PARAMETERS FOR INAACTIVE LINES IN GROUP 1. 

ge 
3783 020332 016702 161634 MOV ACTLNS ,R2 sGET THE ACTIVE irs? LINE BIT MAP. 
3784 020336 005102 COM Re sGENERATE A BIT MAP OF INACTIVE LINES. 
3785 020340 040102 BIC R1,R2 ‘ene ANY NONE EXISTANT INACTIVE LINES. 
3786 020342 005104 COM Ra 
3787 020344 040402 BIC R4,R2 SONLY PASS LGRP2 ASSOCIATED LINE BIT MAP. 
3788 020346 010267 162562 MOV R2,CBMAPA sSET-UP BIT MAP IN CONTROL BLOCK. 
3789 020352 016767 000036 162542 MOV 70¢ ,CBLPRA sSET-UP COMPLAMENTARY LPR PARAM FOR LGRP1. 
meee 020360 004767 005412 JSR PC, TXRINI SINITIALISE INACTIVE LINES IN LGRP1. 

se 
3792 s OISABLE RECEIVERS ON ALL LINES TO ENSURE THAT ONLY THE RECEIVERS OF THE 
3793 s ASSOCIATED ACTIVE (TX) LINES ARE ENABLED.(STAGGARED LOOPBACK) 
cree s RE-ENABLE RECEPTION ON THE CORRECT ASSOCIATED LINES. 

t- 


J8 
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3796 020364 012705 177777 MOV @MAPLNS ,RS sSET-UP BIT MAP FOR ALL LINES. 
8.44 020370 004767 004002 JSR PC,RXOSBL sDISABLE RX ON ALL LINES. 
3¢ 
cone s ENABLE RECEIVERS ON ASSOCIATED (RX) LINES. 
- ‘s 
3801 020374 016705 161572 MOV ACTLNS,RS sGET ACTIVE (TX) LINE BIT MAP. 
3802 020400 004767 177070 JSR PC ,CONMAP sGENERATE AN ASSOCIATED (RX) LINE BIT MAP. 
3803 020404 004767 004062 JSR PC ,RXENBL sENABLE RECEIVERS ON ASSOCIATED LINES. 
3805 020410 608: PASS sRESTORE GRP’'S. 
020410 004736 JSR PC,.@(SP)-+ sRETURN TO PREGOS SUBRT. 
3806 020412 000207 RTS PC 
3807 020414 000000 70%; -WORD O sLOCAL STORAGE OF LPR PARAMETER TX. 
3808 020416 000000 728; -WORD O sLOCAL STORAGE OF LPR PARAMETER RX. 
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004567 
016705 


012767 


012703 


010246 


164700 
161600 


002260 


161546 


000017 
002464 


161572 


-SBTTL GLOBAL SUBROUTINE - GETBOR - 

OF KHRHRHEAAEKSALAEAASAAERARAREAEEASEASESESALEAREEALELASLEAEERESSEEAESAREEEEEREREERE 
i* - GET BAUDRATE SUBROUTINE - 

34 THIS ROUTINE REQUESTS A BAUDRATE INPUT FROM THE OPERATOR. THIS 
3% BAUDRATE IS LOOKED UP IN A TABLE TO GIVE THE LPR BAUDRATE FIELD 
3% VALUE WHICH IS ASSOCIATED WITH THAT BAUDRATE. 

3% , 

3* INPUTS: BORMSG - LABEL AT THE BAUDRATE PROMPT MESSAGE. 

34 BRTBLE - LABEL AFTER END OF THE BAUDRATE TABLE. 

34 UBRFMT - LABEL AT THE UNSUPPORTED BAUDRATE MESSAGE. 

34 

3* OUTPUTS: R1 - BAUDRATE CODE IN LS 4 BITS. 

3% 

3# CALLING SEQUENCE: JSR PC,.GETBDR 

34 

3* COMMENTS: 


3% 
3* SUBORDINATE ROUTINES CALLED: NONE. 
B--— SSHSKAASASESHSASHEASEASSEEHEASASAAAEASESESSAAAEEAAAKEEASEEESEESASEAEEEEESEEEEEE 


GETBOR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS, PREGOS sCALL REGISTER SAVE SUBRT. 
MOV GMANWO , RS :SAVE THE GMAINIX VALUE. 
3¢ 
s PROMPT THE OPERATOR: “MODEM BAUDRATE IN BPS: (D) 1200 ?” 
ee 
2s: MOV #1200. UP DEFAULT VALUE TO 1200 BAUD. 


» GMANWO sSET 
GMANID BDRMSG,GMANWD,D,177777 ,0. 38400. YES 
TRAP C$GMAN 


BR 10000$% 
-WORD GMANWD 
-WORD TSCODE 
- WORD 
-WORD 177777 
-WORD TSLOLIM 
-WORD TSHILIM 
10000$: 
MOV GMANWD , R2 
3¢ 
» ATTEMPT TO LOOK THE VALUE UP IN THE BAUDRATE TABLE. 
3 - 
MOV #15. ,R1 sINITIALIZE BAUDRATE CODE TO HIGHEST BAUDRATE. 
MOV @BRTBLE ,RS sINITIALIZE BAUORATE POINTER. 
4$: CMP R2, -CR3) sCOMPARE BAUDRATE WITH A TABLE ENTRY. 
BEQ 60% :BAUDRATES COMPARE? YES, EXIT WITH CODE. 
DEC Ri sNO, SET BAUDRATE CODE TO NEXT LOWER BAUDRATE. 
BNE as sDONE? NO, LOOP. 
CMP R2,-CR3) sCHECK IF LAST BAUDRATE MATCHES. 
BEQ 60% sBAUDRATES MATCH? YES, EXIT WITH CODE. 


s¢ 
s REPORT “NNNNN IS NOT A SUPPORTED BAUDRATE, ENTER ANOTHER OR CTRL C.” 
PRINTF @UBRFMT,R2 


MOV R2,-CSP) 


SEQ 101 
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60$: 


MOV SP, 
TRAP CSPNTF 
#6,SP 
BR es sLOOP TO GET ANOTHER BAUDRATE. 
MOV RS , GMANWD sRESTORE THE GMANIX PARAMETER VALUE. 
PASS R1 sRESTORE GPRS, EXCEPT THE FOLLOWING: 
MOV R1,R1SLOTCSP) sPUT R1 IN STACK SLOT. 
JSR PC ,.@(SP)-+ sRETURN TO PREGOS SUBRT. 
RTS PC s Ri - BAUDRATE CODE. 


aa nn 
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-SBTTL GLOBAL SUBROUTINE - GETCHR - 


BOF ARAEKRERASEAAKAAESEASAESAEEAEASEESASEESEEADAOEREEEEEREEEREEEEEEAERESEAEEEEEEEEERS 


34 - GET A CHARACTER FROM THE RX BUFFER ROUTINE - 

34 THIS SUBROUTINE GETS A CHARACTER FROM THE RX BUFFER WHICH IS IN THE 
34 HOST SYSTEM MEMORY. IF THE BUFFER IS EMPTY UPON ENTRY OF THIS —— 
34 THIS ROUTINE RETURNS A NULL CHARACTER WITH DATA.VALID CLEAR AND A 

3% BUFFER EMPTY INDICATION. 

3% ‘ 

3# INPUTS: RXBCNT - RX BUFFER CHARACTER COUNT. 

34 RXBEND - LABEL AFTER END OF THE RX BUFFER AREA IN MEMORY. 

34 RXBETX - EQUATED TO RX BUFFER LEVEL AT WHICH TO ENABLE Tx. 

34 RXBOPT - POINTER TO NEXT AVAILABLE INPUT SLOT OF RX BUFFER. 
3* RXBSTA - LABEL AT START OF RX BUFFER AREA IN MEMORY. 

3% 

3 OUTPUTS: R2 - CHARACTER WHICH IS READ FROM THE BUFFER. 

3% RXBOPT - UPDATED TO POINT TO NEXT INPUT SLOT OF RX BUFFER. 

34 RXBCNT - RX BUFFER CHARACTER COUNT CUPDATED). 

3* CARRY - “SUCCESS” FLAG (SET IF BUFFER IS NOT EMPTY ON ENTRY). 
34 

3# CALLING SEQUENCE: JSR PC ,,GETCHR 

3% 

3* COMMENTS: 


3% 
3# SUBORDINATE ROUTINES CALLED: NONE. 


F-- SHHASEAEHAASESASAESESAASHESESHEAASESESESAAEESASAAESEAESEEESEAEEEEESEEESESRESEAEEEE 


GETCHR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT 
:CLEAR THE “RE- yo TX FLAG ate OUTPUT). 

CLR Re sGET NULL CHAR IN CASE BUFFER IS EMPTY 

;CHECK FOR RX BUFFER EMPTY, CLEAR CARRY. 


T A _CHAR ER. 
;DELETE THE READ CHARACTER FROM THE BUFFER. 
sCHECK IF POINTER SHOULD WRAP AROUND. 
BLO 2s sSKIP WRAPAROUND IF POINTER IS NOT AT END. 
MOV @RXBSTA,R4 sWRAP INPUT POINTER AROUND. 
2s: MOV R4,RXBOPT sUPDATE THE OUTPUT POINTER STORAGE. 


DEC RXBCNT sREMOVE THIS CHAR FROM THE BUFFER COUNT. 
SEC sSET SUCCESS FLAG, BUFFER WAS NOT EMPTY. 


608: PASS Re sRESTORE GPRS, EXCEPT 
MOV R2, R2SLOT( SP) sPUT R2 IN STACK SLOT. 
JSR PC, @(SP)-+ sRETURN TO PREGOS SUBRT. 
#R2 - CONTAINS THE CHARACTER READ FROM BUFFER. 
RTs pc sCARRY-"SUCCESS” FLAG, SET IF BUFFER NOT EMPTY. 


SEQ 103 


N8 


DHU-11 FUNCTIONAL VERIFICATION MACRO M1200 12-DEC-83 16:16 PAGE 70 
GLOBAL SUBROUTINE TTIM 


005214 
177400 
161344 


-SBTTL GLOBAL SUBROUTINE 
Sot MARAEREAAAAEEAEAREREEEEREREREEEAEEEEEEEEEEEEEEEEEREAEREEEEREEEEEREEEDEE REDS 
- GET TIME-OUT VALUE BASED ON MINIMUM BAUDRATE ROUTINE - 

THIS SUBROUTINE GETS THE NECESSARY TIME-OUT VALUE TO VERIFY THAT ALL 
CHARS HAVE BEEN RECEIVED AT THE COMPLETION OF THE TX/RX OF A DATA 

THIS USES THE SLOWEST BAUDRATE WHICH IS SPECIFIED IN THE 
PASSED IN DUT LPR CONTENTS TO CALCULATE THIS TIME-OUT VALUE. 


Ri - DUT LPR CONTENTS. 


PATTERN. 


3 
: INPUTS: 


. OUTPUTS: 


. CALLING SEQUENCE: 


m COMMENTS: 


3% 
3# SUBORDINATE ROUTINES CALLED: NONE. 
Fr — SHHAAHHHKSESAAHAASASHASREAERASLASASAAAERESSEAAEAELARASADESASESESRESEEEESEEESEEEAEE 


GETTIM:: 


SAVE 


- GETTIM - 


RXTOUT - TIME-OUT VALUE FOR WAITING FOR LAST RX CHAR. 


JSR 


JSR 
R1 
#177400,R1 


R 
R1,R2 


R2,R1 
PROTBL(R1),R2 
#177400, 
R2,RXTOUT 


JSR 
PC 


PC,GETTIM 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS, PREGOS sCALL REGISTER SAVE SUBRT. 
;PUT THE BAUD RATE FIELOS IN THE LOW BYTE. 
sCLEAR STOP,PARITY,AND CHAR FIELDS. 

;COPY BAUD RATE FIELDS. 

sSELECT RX BAUD RATE FIELD ONLY. 

sSHIFT TX BAUD RATE FIELD 

s TO OCCUPY THE LOW FOUR BYTES. 

i 


i 

sCHECK IF SAME BAUD RATE IN EACH FIELD. 
sBRANCH IF RX BAUD RATE IS LOWER OR SAME 
TX BAUD RATE IS THE SLOWER OF THE TWO. 

sGET PROPORTIONAL DELAY FROM TABLE. 

sCLEAR UPPER BYTE BECAUSE OF SIGN EXTENSION. 
sLOAD THE RX TIME-OUT VARIABLE. 


sRESTORE GPRS. 
PC, @C(SP)-+ 


SEQ 104 


sRETURN TO PREGOS SUBRT. 


BQ 
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016403 
016402 


164412 
161254 


002364 


003202 
003342 


-SBTTL. GLOBAL SUBROUTINE - INIOMA - 

FO SHHEHHSEHEEEESEOEEESEEESEEEEESAEEEASOEEEEEEESESEEEEEEEEESOEEEEESEEEREEEESEEEE 
3¢ - INITIATE OMA TRANSMISSIONS ROUTINE - 

3¢ THIS ROUTINE IS USED TO INITIATE DMA MODE TRANSMISSION. IT SENDS 

36 THE INITIAL DMA BUFFER ON EACH ACTIVE LINE TO CAUSE FUTURE Tx 

3¢ INTERRUPTS WHICH WILL CONTINUE THE TRANSMISSION IF MORE THAN ONE 

36 BUFFER IS TO BE SENT. 

3¢ 

3@ INPUTS: ACTLNS - ACTIVE LINES BIT MAP. 

3* BITTBL - LABEL OF TABLE OF WORDS EACH WITH A BIT SET. 

3° CSRA - CONTAINS THE ADDRESS OF THE DUT CSR. 

3* DPENDB - BASE OF THE DATA PATTERN END TABLE (ENTRY PER LINE). 
3¢ DPLENB - BASE OF THE DATA PATTERN LENGTH TABLE. 

36 IESTAT - PRESERVED STATES OF THE DUT wy & ENABLE BITS. 

34 NUMLNS - EQUATED TO NUMBER OF LINES ON A OUT. 

34 TXCNTB - LABLE AT BASE OF THE TX CHARACTER COUNTER TABLE. 

3¢ TXPTRB - LABEL AT BASE OF THE TX DATA PATTERN POINTERS TABLE. 
34 

3@ OUTPUTS: CSR - DUT CSR IND.ADR.REG FIELD IS DESTROYED. 

34 qeeeeeeccececcceee: ADD COMMENTS €€6666666666666666666660 00600 C€ 
:4 TXCNTX - COUNTERS INCREMENTED FOR LINES ON WHICH CHARS SENT. 
3¢ TXINTF - TX INT FLAGS (BIT SET IF OMA.HO FOUND SET ON LINE). 


* 
s@ CALLING SEQUENCE: JSR PC, INIDMA 


« 
3 COMMENTS: Su ROUTINE ASSUMES THAT AT LEAST ONE DATA PATTERN SHOULD BE 
36 TRANSMITTED ON EACH ACTIVE LINE. 

36 INTERRUPTS MUST BE DISABLED WHEN CALLING THIS ROUTINE. 


ie SUBORDINATE ROUTINES CALLED: DODMA. 


B--— SSHEOHSSSESSSOSSSSEEESS EESSSSEOSSESEEAEHEHESESSESESESEESEEESEESEEEEESEEEEEERE 


INIOMA:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL peg bh SAVE SUBRT. 
MOV ACTLNS RS sGET THE ACTIVE LINES BIT MAP 
¢ 
s SET UP LOOP WHICH HANDLES ONE LINE PER ITERATION. 
ge 
CLR R1 sCLEAR THE LINE NUMBER COUNTER. 


3° 

s GET A BIT MAP OF THE SELECTED LINE. 

s IF THE LINE IS INACTIVE SKIP TO SELECT THE NEXT LINE. 
t- 


2s: MOV R1,R4 i. AN OFFSET TO THE PROPER LINE 
ASL R4 ENTRY IN A WORD TABLE (LINE @ TIMES 2). 
MOV BITTBL(R4),R2 iGET A BIT MAP FOR THIS LINE. 
BIT R2,R5 sTEST THE ACTIVE LINES BIT FOR THIS LINE. 
BEQ 108 sD0N‘'T TX ON THIS LINE IF IT IS NOT ACTIVE. 


3¢ 

s LINE IS ACTIVE. 

s INITIATE OMA ON THIS LINE. 

5 GET THE DATA PATTERN LENGTH FOR THIS LINE. 


3 - 
MOV OPLENB(R4),.R3  ;GET DATA PATTERN LENGTH FOR THIS LINE. 
MOV TXPTRBC(R4),R2 PREPARE TO PASS DATA PATTERN ADR TO DODMA RIN. 


a¢ 
s WRITE OMA PARAMETERS TO THE DUT. 
t- 


ro 


SEG 105 


EET SE eI RE ERO IRD ce RE OF iI ot 


C9 
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GLOBAL SUBROUTINE - INIOMA - 
4004 020744 004767 177034 JSR PC,DODMA 
aeen 020750 103403 BcS 6% sSKIP ERROR IF DODMA WAS SUCCESSFUL . 
3¢ 
aees s SET THE PROPER BIT OF THE TX INTERRUPT FLAGS TO INDICATE THE LINE ERROR. 
* 
4009 020752 050567 161506 BIS RS, TXINTF sINDICATE THE ERROR. | 
reer 020756 000402 BR 10% sSKIP UPDATING POINTERS AND COUNTERS. 
¢ 
pet s UPDATE THE TX CHARACTER COUNT FOR THIS LINE. 
g¢ 
pei 020760 060364 003502 6%: ADD R3,TXCNTBCR4)  ;ADD THE DATA PATTERN LENGTH TO TX CHAR COUNT. 
3° 
seat s INCREMENT LINE COUNTER,GOTO NEXT LINE IF NOT DONE. 
3 a 
4018 020764 005201 : 108: INC R1 s INCREMENT THE LINE COUNTER. 
4019 020766 020127 900020 CMP R1, ONUMLNS sCOMPARE THE LINE COUNTER WITH NUMBER OF LINES. 
rons 020772 002752 BLT 2s sLOOP TO SEND CHAR TO ANOTHER LINE IF NOT DONE. 
4022 020774 60$: PASS sRESTORE GPRS. 
020774 004736 JSR PCAC SP)> sRETURN TO PREGOS SUBRT. 
4023 020776 000207 RTS PC 


mo 


D9 
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GLOBAL SUBROUTINE LINBIT 
4025 -SBTTL GLOBAL SUBROUTINE - LINSIT - 
4026 FOF SHEHASHHEHSHSEHSOHESSSEHEHHESEEEEAHEAEHEEEOEEEESESEESEAEEEEEEEEEEEEEEAOEEEEODEEAE 
4027 34 - LINE NUMBER TO BIT MAP CONVERSION SUBROUTINE - 
4028 34 THIS SUBROUTINE IS USED TO GENERATE A BIT MAP (CONE BIT OF 16 SET) 
4029 3@ BASED ON A LINE NUMBER CRANGE: 1 TO 16). ONLY THE LS 4 BITS OF THE 
4030 34 LINE NUMBER WORD ARE USED, THE OTHERS ARE MASKED OUT (SO UNMASKED 
poe] 34 MSBYTES OF DUT CSRS CAN BE PASSED TO THIS ROUTINE WITHOUT ERROR). 
3¢ 
4033 3@ INPUTS: Ri - LINE NUMBER CONLY ‘5 4 BITS USED, OTHERS DISREGARDED). 
oan 34 BITTBL - BASE LABEL OF A 16 WORD BIT TABLE. 
34 
4036 3@ OUTPUTS: RO - BIT MAP, BIT CORRESPONDING TO LINE NUMBER IS SET: 
poe dd 3¢ IF LINE NUMBER IS 3, THEN BITS IS SET, ETC. 
3% 
poe 3* CALLING SEQUENCE: JSR PC LINBIT 
34 
4041 3@ COMMENTS: - CHECKING IS PERFORMED TO VERIFY THAT THE LINE NUMBER IS 
4042 pe A LEGAL LINE NUMBER FOR THE DUT CIE - LESS THAN NUMLNS). 
4043 34 NOTE: T4E LINE NUMBER IS NOT DESTROYED OF ALTERED, SO THIS 
pen 34 ROUTINE CAN BE USED EASILY IN LOOPS. 
34 
4046 3@ SUBORDINATE ROUTINES CALLED: NONE. 
4047 8-- SESESOSESESEEEEAEESESESESESESESEEESEEEEEEEEEESESESEESESESESESESESESEESESESES 
4049 021000 LINBIT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
021000 004567 164320 JSR RS, PREGOS sCALL REGISTER SAVE ae 
4050 021004 042701 177760 BIC #177760,R1 1 MASK OUT ALL put 4 LSBITS OF THE LINE @ 
4051 021010 006301 ASL R1 sMULTIPLY LINE @ BY 2 TO GET WORD TABLE OFFSET. 
4052 021012 016100 002364 MOV BITTBLCR1),RO sGET THC SINGLE BIT BIT MAP. 
4053 021016 608: PASS RO sRESTORE GPRS, EXCEPT THE FOLLOWING, 
021016 010066 000002 MOV RO,ROSLOT( SP) sPUT RO IN STACK SLOT. 
021022 004736 JSR PC .@CSP)-+ sRETURN TO ro SUBRT 
4054 021024 000207 RTS PC sRO - BIT MAP WITH LINE @ BIT SET 


a 


E9 | 
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GLOBAL SUBROUTINE - MODSUP 
4056 -SBTTL GLOBAL SUBROUTINE - MODSUP - 
4057 BOF SHOHOHSESHAEHEEEESADEEASERESESESASESREEESEEEEEEEECESEEEEAESESESEEEESEAEEEEEEES 
pie +4 - MODEM LOOPBACK TX/RX SET-UP ROUTINE - 
g 8 ; 
4060 i¢ THIS ROUTINE IS USED TO INITIALISE BOTH THE DUT AND THE 
4061 14 TRANSMISSION/RECEPTION CONTROL PARAMETERS TO THE CORRECT 
re | ’ 1¢ STATE, PRIOR TO A MODEM LOOPBACK TEST DATA PATTERN TX/RX. 
am 
4064 i INPUTS: Rl - TX, RX LPR CONTENTS. 
4065 34 R2 - START ADORESS OF DATA PATTERN TO TRANSMIT. 
4066 1¢ R3_- LENGTH OF DATA PATTERN. 
4067 3* ACTLNS - CONTAINS A BIT MAP OF ALL CURRENTLY ACTIVE LINES. 
pies i¢ CBB - LABEL AT BASE OF TX/RX CONTROL BLOCK. 
34 
4070 3@ OUTPUTS: THE CONTENTS OF THE TX/RX CONTROL BLOCK (CCB) ARE DESTROYED. 
4071 34 THE INDIRECT ADDRESS FIELD OF THE DUT CSR MAY BE DESTROYED. 
4072 34 THE DUT'S LPR’'S AND LNC‘S MAY BE MODIFIED. 
4073 i) THE FOLLOWING POINTERS ANDO COUNTERS ARE INITIALISED; 
4074 s¢ CHCNT ,CHRTOT ,OPEND ,OPLEN,EXCNT ,RXCNT,RXPTR, TXCNT, 
4075 4 TXPTR, TXRXL. 
pede 34 CHRTOT, RXDONF, TXDONF AND TXINTF ARE CLEARED. 
3% 
psd s@ CALLING SEQUENCE: JSR PC ,MODSUP 
3% 
4080 3@ COMMENTS: OUT IS SET UP WITH OSR AND DTR SET. ONE DATA PATTERN IS 
40861 s¢ SENT AND RECEIVED FROM EACH LINE. 
4082 3% 
4083 s# SUBORDINATE ROUTINES CALLED: CONMAP,RXENBL, TXRINI. 
poe F-—— SHESHHSHSHSESHSESSSSASHSESSEHSSHSSEOEEEEEESESSHEEAESEESEEESEHEHEEEEEEEEEESESD 
4086 021026 MODSUP:: SAVE sSAVE CONTENTS OF THE GPR‘S RO THRU RS. 
021026 004567 164272 GOS sCALL REGISTER SAVE SUBRT. 
4087 021032 005067 161440 CLR CHRTOT sCLEAR TOTAL RECEIVED CHAR COUNTER. 
4088 021036 005067 161222 CLR TXINTF sCLEAR FLAGS USED TO LOG OMA H.OVER ERRORS. 
4089 021042 005067 161434 CLR TXDONF sCLEAR THE TX DONE FLAGS. 
pos 021046 005067 161432 CLR RXDONF sCLEAR THE RX DONE FLAGS. 
+ 
ooen ; SET UP THE TRANSMISSION/RECEPTION CONTROL BLOCK TO THE DESIRED STATE. 
4094 021052 010167 162044 ‘ MOV R1,CBB sSET CONTENTS OF LPR PARAMS IN TX/RX C.BLK. 
4095 021056 012701 003122 MOV CBB ,.R1 sGET BASE ADORESS OF CONTROL BLOCK. 
4096 021062 005201 INC Ri SS FOR NEXT WORD 
4097 021064 INC R1 ye | THE FOLLOWING IN THE CNTRL.BLK: 
4096 021066 012721 011004 MOV #11004 ,,(R1)+ s LNCTRL: RTS, OTR, ENABLE RECEIVERS. 
4099 021072 010221 MOV R2,CR1)+ s START ADORESS OF DATA PATTERN. 
4100 021074 010321 MOV R3,CR1)+ ; DATA PATTERN LENGTH. 
4101 021076 012721 1 MOV #1,(R1)+ s NUMBER OF DATA PATTERNS TO TRANSMIT. 
4102 021102 016721 161064 MOV ACTLNS,(R1)+ ; BIT MAP OF LINES TO INITIALISE. 
4103 021106 112721 000003 MOVE #@3,(R1)+ sSET LOOPBACK MODE TO 
4104 021112 INC Ri sINCREMENT ADORESS FOR THE NEXT WORD. 
sian 021114 012711 000002 MOV #2,(R1) iSET AMOUNT OF OFFSET EACH TX STARTS AT TO 2. 
se 
4107 s INITIALISE THE DUT AND THE ASSOCIATED POINTERS AND COUNTERS, TO THE STATE 
sine s DICTATED BY THE CONTENTS OF THE TX/RX CONTROL BLOCK. 
t- 
anit 021120 004767 004652 JSR PC, TXRINI sINITIALISE OUT. 
1¢ 
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4112 


012701 


177777 
161036 
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- MODSUP - 


s INITIALISE POINTERS AND COUNTERS FOR INACTIVE LINES TO ZERO. 


@MAPLNS ,R1 
a TLNS ,R2 


CBDPNA 
PC, TXRINI 


JSR 
PC 


sGET THE LINE BIT MAP FOR ALL LINES. 
sGET THE ACTIVE LINE BIT MAP. 
‘ 


$ 

sGENERATE AN IN-ACTIVE LINE BIT MAP. 
sMOVE BIT MAP TO THE CONTROL BLOCK. 
sCLEAR THE LNCTRL SET UP PARAMETERS. 
sCLEAR THE REPEAT TX COUNT IN CNTRL BLCK. 
sSET UP PARAMETERS FOR INACTIVE LINES. 


sRESTORE GPR'S. 
+ 


SEQ 109 


PC, acsP) sRETURN TO PREGOS SUBRT. 


G9 
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NE MSLGET 


GLOBAL SUBROUTI 


021166 


4169 

4170 021172 
4171 021174 
4172 

4173 

4174 

4175 021176 
4176 021200 
4177 021202 
4176 021204 
4179 021210 
4160 021212 
4161 021214 
4162 021216 


004567 


164132 


000070 


-SBTTL GLOBAL SUBROUTINE - MSLGET - 
j PORARARESESAEAEDEEEEEESEDEREEEEDEDEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEDDEEEEEDEOES 
i¢ - MILLI SECONDS LOOP WHICH RETURNS RE 


3% THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. IT IS USED 
34 TO VERIFY THAT A TCERTAIN ACTION OCCURS BEFORE A TIME-OUT PERI THE 
34 CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 
+* DESIRED CONDITION AND THE TIME-OUT VALUE IN MILLI-SECONDS. 

A THIS ROUTINE CHECKS FOR THE CESIRED CONDITION ye ENTRANCE INTO THE 
34 ROUTINE AND THEN ONCE EACH MILLI-SECOND THERE AFTER. 

3% UPON RETURN, THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION 
34 IS RETURNED BY THIS SUBROUTINE. 

34 

3* INPUTS: Ri - TIME-OUT VALUE IN MILLI-SECONDS (UP TO 64K MS). 

34 R2 - BIT MAP OF BITS ‘O TEST (1 INDICATES TO TEST THE BIT). 

34 - - DESIRED STATES OF THE INDICATED FIELDS IN Re. 

34 4 - ADDRESS OF THE WORD TO TEST. 

34 MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT. 

3% 

3# OUTPUTS: RO - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 
8 Ril - REMAINING NUMBER OF MS IN TIME-OUT TIME. 

34 CARRY - SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME-OUT). 
3% 

3@ CALLING SEQUENCE: JSR PC ,MSLGET 

34 

3@ COMMENTS: THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, BUT THE 
34 age ag IS ONLY GUARENTEED WHEN A LINE CLOCK IS AVAILABLE 
3% 

36 THIS ROUTINE CAN BE USED AS A DELAY ROUTINE, BY SPECIFYING THE 
36 DESIRED DELAY AS THE TIME-OUT AND SPECIFYING A CONDITION TO 

34 LOOK FOR WHICH WILL NOT BE MET DURING THE DELAY. 

34 IF A TIME-OUT VALUE OF O IS SPECIFIED, THIS ROUTINE CHECKS FOR 
34 THE DESIRED CONDITION BEFORE RETURNING. IT INDICATES SUCCESS 
3¢ IF THE CONDITION IS MET, FAILURE OTHERWISE. 

. - 


° SUBORDINATE ROUTINES CALLED: NONE. 
; COOOOESEEESESEEEEEEEEEEESEEEEEEEEEEEENEDEEE6066664000660600060000060000000000000008 


MSLGET:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


° 
; SET UP MASK FOR REMOVING UNUSED BITS IN THE TEST WORD, AND CLEAR UNUSED 
s BITS IN THE DESIRED STATE WORD TO ALLOW DIRECT COMPARISON. 


“3 con sé :GET MASK OF UNUSED BITS. 
BIC —-R2, RB ;MASK OUT UNUSED BITS IN DESIRED STATE WORD. 


t¢ 
s HANDLE THE TEST AND EXIT IF WE HAVE A O TIME-OUT VALUE. 
t- 


TST Ri sTEST THE TIME-OUT VALUE FOR ZERO. 

BNE 8 sIF -ZERO TIME-OUT, GO LOOP AND TEST. 
MOV CR4),RO 1GET THE WORD TO TEST BEFORE EXITING. 

MOV RO, 628 sSAVE VALUE SO WE CAN RETURN IT. 

BIC R2,RO sMASK OUT UNTESTED BITS OF WORD. 

CMP RO,R3S sCOMPARE AGAINST DESIRED STATE WORD. 

SEC S INDICATE SUCCESS IN CASE WOROS ARE EQUAL. 
BEQ 6% sEXIT WITH SUCCESS IF WORDS ARE EQUAL. 


SEQ 110 
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GLOBAL SUBROUTI MSLGET 
4183 021220 000241 CLC s INDICATE FAILURE (TIME-OUT). 
ry 021222 000416 BR 6$ sEXIT WITH FAILURE, WORDS AREN'T EQUAL. 
4187 he 
4188 021224 016705 161062 2s: MOV MSLCNT,RS sLOAD MS LOOP COUNT. 
4189 021230 011400 4$; MOV CR4),RO sGET THE WORD TO TEST. 
4190 021232 010067 000042 MOV RO,62$ sSAVE WORD IN CASE THIS IS THE LAST. 
4191 021236 040200 BIC R2,RO sMASK OUT UNTESTED BITS OF WORD. 
4192 021240 020003 CMP RO,R3 3s COMP AGAINST DESIRED STATE WORD 
4193 021242 000261 SEC sSET CARRY CASE OF SUCC 
4194 021244 001405 BEQ 6$ sEXIT WITH SUCCESS IF WORDS ARE EQUAL. 
4195 021246 005305 DEC R5 sCOUNT DOWN THE INSIDE MS LOOP COUNT. 


4196 021250 001367 BNE 4s sLOOP IF MS NOT UP. 

4197 021252 005301 DEC R1 sOECREMENT THE MS TIME COUNT. 

4198 021254 001363 BNE es sIF TIME NOT UP, LOOP TO COUNT ANOTHER MS. 
4199 021256 000241 cLc sCLEAR CARRY, WE TIMED-OUT. 


3¢ 
4201 s HAVE EITHER FOUND CONDITION, OR TIMED-OUT (POSSIBLY FROM O T7ME-OUT VALUT). 
4202 s RESTORE THE LAST CONTENTS READ FROM THE TEST WORD. EXIT ROUTINE. 

s¢ 


4204 021260 016700 000014 6%: MOV 62% ,RO sPASS OUT THE LAST READ WOaD. 
4205 021264 608: PASS RO,RL sRESTORE GPRS, EXCEPT THE FOLLOWING: 
021264 010066 000002 MOV RO, ROSLOT(SP) sPUT RO IN STACK SLOT. 
021270 010166 000004 MOV R1,R1ISLOTCSP) sPUT R1 IN STACK SLOT... 
021274 004736 JSR PC, (SP)+ sRETURN TO PREGOS SUBRT. 
4206 sRO - LAST READ WORD CHECKED FOR CONDITION. 
4207 sR1_- REMAINING TIME (O IF TIME-OUT OCCURED). 
4208 021276 000207 RTS PC sCARRY - SET IF SUCCESS, CLEAR IF TIME-OUT. 


3¢ 
4210 s LOCAL STORAGE. 


| 
ad 
4186 s NON-ZERO TIME-OUT VALUE. LOOP, WAITING FOR CONDITION OR TIME-OUT. 
i s- 
4212 021300 000000 62%: -WORD O sSTORAGE FOR THE LAST READ WORD. 


19 
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GLOBAL SUBROUTINE MSLOOP 


4252 

4253 021306 

4254 

4255 G2i3izé 
021312 

4256 021314 


004736 
000207 


164016 


177654 


-SBTTL GLOBAL SUBROUTINE - MSLOOP - 


F SHHAHSSEHESEREASASASHSESESASEHEAEESEHAEESASEEEEEEEEEAEEELEAOEEEEESESEEEEEESEEEEERE 


34 - TEST LOOP SUBROUTINE - 

34 THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP nour be IT IS USED 
34 TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PERIOD. THE 
3% CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 
3% DESIRED CONDITION AND THE TIME-OUT VALUE IN MILLI-SECONDS. 

34 THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 
34 ROUTINE AND THEN ONCE EACH MILLI-SECOND THEREAFTER. 

Ge 

3@ INPUTS: Ril - TIME-OUT VALUE IN MILLI-SECONDS (UP TO 64K MS). 

3% R2 - BIT MAP OF BITS TO TEST (1 INDICATES TO TEST THE BIT). 

34 R3 - DESIRED STATES OF THE INDICATED FIELDS IN Re. 

34 R4 - ADDRESS OF THE WORD TO TEST. 

34 MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT. 

3% 

3@ OUTPUTS: CARRY - SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME -OUT). 


a 

s# CALLING SEQUENCE: JSR PC ,.MSLOOP 

* 

3¢ COMMENTS: THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, 


BUT THE 
34 nie aveten IS ONLY GUARENTEED WHEN A LINE CLOCK IS AVAILABLE 
3% 
34 THIS ROUTINE CAN SE USED AS A DCLAY ROUTINE, BY SPECIFYING THE 
:¢ DESIRED DELAY AS THE TIME-OUT AND SPECIFYING A CONDITION TO 
34 a FOR WHICH WILL NOT BE MET DURING THE DELAY. 
34 IF A TIME-OUT VALUE OF O IS SPECIFIED, bite ROUTINE CHECKS FOR 
34 THE DESIRED CONDITION BEFORE RETURNING. T INDICATES SUCCESS 
fT IF THE CONDITION IS MET, FAILURE OTHERUISE. 


3% 
3@ SUBORDINATE ROUTINES CALLED: MSLGET. 
FS SSAAAASSHSESASSESSSSSASEESSHEKSSEEEKEEKEEEEEEKEEEEEEEESEEEEEEEEEEOSEEEEEEEEEEEEED 


MSLOOP:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


: * CALLING THE MSLGET ROUTINE FROM THE MSLOOP ROUTINE ISOLATES THE CALLER OF 
s MSLOOP FROM THE RETURNED TEST WORD AND REMAINING TIME-OUT VALUES. 
le 


JSR PC .MSLGET sCALL THE MULTI-PURPOSE MS LOOP AND SEARCH RIN. 
608: PASS sRESTORE GPRS, 
JSR PC.@CSP)+ URN TO PREGOS SUBRT. 
RTS PC ;CARRY - SET IF success CLEAR IF TIME-OUT. 


SEQ 112 


GLOBAL SUBROUTINE 


ivyfr 


| 
J9 | 
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4258 -SBTTL GLOBAL SUBROUTINE - MSSRPT - 
4259 2+ SHAKHEAEAAAAASAAREAAASAEEAERERERAEEASEEEAEAEEEEESESEEEEEESEEEAEEAEEEEERDDEDRSE 
4260 3% - MODEM STATUS SIGNAL REPORT ROUTINE - 
4261 34 THIS SUBROUTINE Is USED TO REPORT THE STATES OF THE MODEM STATUS 
aaat 34 SIGNALS FOR ALL ACTIVE LINES. 
3% 
4264 3* INPUTS: ACTLNS - BIT MAP OF ACTIVE LINES. 
4265 3% CSRA - CONTAINS ADDRESS OF THE DUT CSR. 
4266 34 EF9101 - LABEL AT FORMAT STATEMENT FOR BLANK LINE. 
4267 3% IESTAT - CONTAINS STATES OF THE DUT INTERRUPT ENABLE BITS. 
4268 34 STATA - CONTAINS ADDRESS OF THE DUT STAT REGISTER. 
ante 3% NUMLNS - EQUATED TO THE NUMBER OF LINES ON THE DEVICE. 
3% 
4271 3@ OUTPUTS: DUT CSR IND.ADR.REG FIELD - CONTENTS DESTROYED. 
ps Le | 34 REPORT MESSAGES ARE PRINTED ON THE OPERATOR'S CONSOLE. 
4 3% 
4274 3@ CALLING SEQUENCE: JSR PC ,.MSSRPT 
4275 i¢ 
4276 3@ COMMENTS: 
4277 3% 
4278 3@ SUBORDINATE ROUTINES CALLED: NONE. 
4279 8-- S8O8666664646466606664666666 6646666666666 666606606066666060660666666664666466464640646 
4280 
4281 021316 MSSRPT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
anee 021316 004567 164002 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
3¢ 
4283 3 PRINT THE BASIC MODEM STATUS MESSAGE. 
Pred 3 “MODEM STATUS SIGNAL REPORT: “ 
3 
4286 021322 PRINTF @MSFMT1L 
021322 012746 007577 MOV @MSFMT1,-CSP) 
021326 012746 000001 MOV #1,-CSP) 
021332 010600 MOV SP RO 
021334 104417 TRAP CSPNTF 
eae? 021336 062706 000004 ADD @4,SP 
4288 021342 005001 CLR R1 sSTART WITH LINE O. 
4269 021344 012702 000001 MOV #1,R2 
4290 021350 016703 160624 MOV CSRA,R3S sGET THE CSR ADDRESS. 
4291 021354 016704 160654 MOV IESTAT, RO sGET THE STATES OF THE oad ENABLE BITS. 
aaen 021360 016705 160606 MOV ACTLNS,RS sGET THE ACTIVE LINES BIT MAP 
4294 021364 030205 2s: BIT R2,R5 sTEST LINE BIT IN ACTIVE LINES BIT MAP. 
4295 021366 001442 BEQ as sLINE ACTIVE? NO, SKIP REPORT FOR LINE. 
4297 021370 010400 MOV R4,RO sSET UP DUT CSR IND.ADR.REG FIELD 
4298 021372 050100 BIS R1,RO 3s LEAVING THE INTERRUPT ENABLE 
4299 021374 010013 MOV RO,CR3) s BITS IN THE SPECIFIED STATE. 
4300 021376 017700 160604 MOV @FSLSA,RO sREAD THE DUT STATUS REG FOR THIS LINE. 
4301 021402 SAVE 1 SAVE CONTENTS OF GPRS RO THRU RS. 
021402 004567 163716 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
4302 021406 005002 CLR Re sCLEAR THE SIGNAL STATUS INDICATORS. 
4303 021410 005003 R3 
4304 021412 005004 CLR R4 
4305 021414 005005 CLR RS 
4306 021416 006300 ASL RO sSHIFT OSR INTO CARR 
4307 021420 006102 ROL R2 s THEN ROTATE INTO INDICATOR. 





4308 021422 


S26 
4330 021530 


007637 
000006 


007262 
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GLOBAL SUBROUTINE MSSRPT 


SEQ 114 


sSHIFT BLANK SLOT pond CARRY, 
s SHIFT RI INTO CARR 
s_ THEN ROTATE INTO TNOICATOR. 


TO CARRY, 
+ THEN ROTATE INTO INDICATOR. 


3+ 
:; PRINT THE STATUS FOR THIS LINE. 
OSR=N, RI=N, OCD=N, CTS*N” 


OMSFMT2],R1,R2,R3,R4,R5 


4%: 


608: 


"LINE ON: 
PRINTF 


PASS 
RTS 


JSR 
Re 
R1 
R1, @NUMLNS 
2s 


O€F9101 


JSR 
PC 


P - 


MOV RS, -(SP) 
MOV R4,-CSP) 
MOV R3,-CSP) 
MOV R2,-C(SP) 
MOV R1,-CSP) 
MOV @MSFMT2, -CSP) 
MOV »-CSP) 
MOV ° 
TRAP CSPNTF 
#16,SP 


sRESTORE ALL THE GPRS. 
PC, @CSP)+ sRETURN TO PREGOS SUBRT. 


sSHIFT LINE BIT MAP TO NEXT LINE. 

s INCREMENT THE LINE COUNTER. 

sCMP LINE COUNTER WITH © OF LINES ON DEVICE. 
sALL LINCS DONE? NO, LOOP TO DO NEXT LINE. 


sPRINT A BLANK LINE. 


MOV @€F 9101, -(SP) 
MOV #1,-CSP) 
MOV 2RO 
TRAP CSPNTF 
ADD @4,SP 
sRESTORE GPRS. 
PC,@CSP)-+ sRETURN TO PREGOS SUBRT. 


- | 


LY 
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GLOBAL SUBROUTINE MUL 16U 


021570 
021574 


021576 
021576 
021602 


021604 


004567 
005003 


012701 
000241 


010166 
004736 


000207 


163566 


177777 


000004 


-SBTTL GLOBAL SUBROUTINE - MUL16U - 

BOF RHARKHHRAKAASALASAAAASEAEAAAEEEAAEAERADASEREEAEROAREREEESEEEEEEEARESHAEREEEES 
34 - 16 BIT UNSIGNED MULTIPLY ROUTINE - 

34 THIS ROUTINE MULTIPLIES 2 16 BIT UNSIGNED NUMBERS AND RETURNS A 16 BIT 
3% UNSIGNED RESULT. THE MULTIPLICATION IS PERFORMED BY ITERATIVE 

3% ADDITION OF ONE NUMBER TO A SUM WHILE DECREMENTING THE OTHER NUMBER 

34 TO ZERO. IF OVERFLOW OCCURRS (177777 TO 0) THE PROOUCT IS INVALID. 

3% 

3* INPUTS: R1 - MULTIPLICAND (16 BIT UNSIGNED). 

34 R2 - MULTIPLIER (16 BIT UNSIGNED). 

3% 

3 OUTPUTS: R1 - PRODUCT (16 BIT UNSIGNED), -1 IF OVERFLOW. 

34 CARRY - SET IF SUCCESS (NO OVERFLOW), CLEAR OTHERWISE. 


3% 
3# CALLING SEQUENCE: JSR PC ,MUL16U 


3% 
:* COMMENTS: NOTE: FOR MINIMUM EXECUTION TIME R2 SHOULD CONTAIN THE 
1¢ SMALLER OF THE 2 ARGUMENTS. 


34 
3@ SUBORDINATE ROUTINES CALLED: NONE. 
F-— SHHHSAHASASHSSSSHAKESEHSAHESEHEEEAEEHASESSEEEESESEESAAEAEEEEESEEEEEEEEEEEEEEE 


MUL16U:: SAVE sSAVE CONTENTS OF GPRS RO HRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
CLR R3 ;CLEAR THE PRODUCT 
TST Re sCHECK THE MULTIPLIER. 
BNE es sGO TO i MULTIPLICATION IF NOT ZERO. 
CLR Ri sRETURN A PRODUCT OF ZERO. 
SEC VINDICATE ap te £ 
BR 60% sEXIT THE ROUTINE 
2s: ADO R1,R3 sADD THE MULTIPLICAND TO THE PRODUCT. 
ecs 50s sEXIT WITH OVERFLOW IF ONE OCCURRED. 
DEC Re sOECREMENT THE MULTIPLIER. 
BNE 2s sLOOP IF MA.TIPLIER NOT ZERO. 
MOV R3,R1 sPREPARE TO PASS OUT THE PRODUCT. 
SEC sINOICATE SUCCESS. 
BR 60% sEXIT WITH SUCCESS. 
508: MOV @-1,R1 sFORCE PRODUCT TO MAX VALUE, WE OVERLFOWED. 
cic sINDICATE FAILURE. 


sRESTORE GPRS, EXCEPT THE FOLLOWING: 
MOV Ri. RiSLOTC( SP) sPUT R1 IN STACK SLOT. 
JSR PC, aC SP). 
s R1 - PRODUCT (16 BIT UNSIGNED), 
RTS PC 5 CARRY - SET IF SUCCESS (NO OVERFLOW). 


sRETURN TO PREGOS SUBRT. 


SEQ 115 
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GLOBAL SUBROUTINE NEWCHR 
4377 .SBTTL GLOBAL SUBROUTINE - NEWCHR - 
4378 SOF AHERARAERARHAERASAASAERESAEASEASRASASEAEEASEESESEEEAEEEAREEEREEEEAEEAEEEEREDRES 
4379 34 - NEW CHARACTER HANOLING ROUTINE - 
4380 34 THIS SUBROUTINE HANDLES A NEW CHARACTER WHICH HAS BEEN READ FROM 
4381 34 THE DUT. THE COUNTERS AND POINTERS WHICH ARE INVOLVED WITH THE 
4382 34 CHARACTER ARE UPDATED. THE CHARACTER IS CHECKED FOR ERRORS AND 
438s ;4 ANY ERRORS WHICH ARE FOUND ARE REPORTED. 
3% 
4385 3* INPUTS: R2 - THE READ CHARACTER INCLUDING ERROR FLAGS AND LINE NUMBER. 
4386 34 R3 - MASK OF THE INACTIVES BITS IN A TX OR RX CHAR BYTE. 
4387 34 ACTLNS - BIT MAP OF ACTIVE DUT LINES. 
4388 3 DPRSQ@B - LABEL AT DATA PATTERN RESYNC QUEUES TABLE BASE. 
4389 3 TXRXLB - BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 
4390 34 BITTBL - TABLE OF WORDS WITH BITS SET FOR USE IN FORMING MAPS. 
4391 3:4 ERSMRF - “PRINT ERROR SUMMARY FOR LINE” FLAGS. 
4392 34 ERRTBL - ERROR INFORMATION CERRNBR, ERRMSG, ERRTYP). 
4393 + ERCNTB - BASE OF THE RX CHARACTER ERROR COUNTERS TABLE. 
4394 NDERPT - CONTAINS NUMBER OF CHAR ERRORS TO REPORT ON A LINE. 
4395 > INPUTS TO SUBROUTINES: CHCNTB, OPENOB, OPLEN, DPRSQE, EXCNTB, RXCNTB, 
4396 36 RXPTRB, ERRNBR, ERMSG, ERRTYP. 
34 
4398 3@ OUTPUTS: ERRBLK - CONTENTS DESTROYED. 
4399 3 FOLLOWING VARIABLES UPDATED FOR LINE ON WHICH CHAR WAS RECEIVED: 
4400 34 DPRSQ - DATA PATTERN RESYNC QUE OF RECEIVED CHARACTERS. 
4401 34 ERCNT - COUNT OF THE NUMBER OF CHARACTER ERRORS ON LINE. 
4402 34 ERSMRF - UPDATED "PRINT ERROR SUMMARY FOR LINE” FLAGS. 
4403 34 EXCNT - COUNT OF THE NUMBER OF EXTRA CHARS RECEIVED ON LINE. 
4404 34 RXCNT - COUNT OF THE NUMBER OF CHARACTERS RECEIVED ON LINE. 
4405 34 RXPTR - UPDATED TO POINT TO THE NEXT EXPECTED CHAR ON LINE. 
4406 36 
4407 3# CALLING SEQUENCE: JSR PC,.NEWCHR 
4408 3% 
4409 3@ COMMENTS: THIS ROUTINE CAN REPORT ERRORS WITH NUMBERS INITIAL ERRNBR 
4410 34 AND INITIAL ERRNBR + 1. ERRNBR IS RESTORED TO ITS INITIAL 
“ait 3 VALUE BEFORE THIS ROUTINE RETURNS. 
3% 
4413 3@ SUBROUTINES CALLED: CKCHR,CKINAC, TXROFF , TXRON. 
4414 3@ INDIRECT SUBROUTINES: CHKEXT,CHKLOS,ER9002,ER9003,UPDCHR. 
rr $-— SSHSESHSASHSSSSSSSAAESESESESHSSSESASASASESESSSESSESSESHEEASAAAKAEEESEEREREELEE 
4417 021606 NEWCHR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
021606 004567 163512 JSR RS, PREGOS sCALL REGISTER SAVE SUBRT 
4418 021612 010305 MOV R3,R5 :GET THE BIT MAP OF INACTIVE DATA BYTE BITS. 
4419 021614 052705 177400 BIS #177400,R5 sALL UPPER BITS OF EXPECTED DATA ARE INACTIVE. 
aco 021620 005067 000270 CLR 708 s;CLEAR THE “ERROR FOUND” FLAG. 
3¢ 
4422 3 IF THE NEW CHARACTER IS VALID ON AN INACTIVE LINE, GO REPORT ERROR. 
ry 3 ROUTINE USED ALSO EXTRACTS LINE NUMBER FROM THE NEW CHARACTER. 
i- 
4425 021624 004767 175412 JSR PC, CKINAC sCHECK FOR CHAR ON INACTIVE LINE. 
seas 021630 103052 Bcc 43 13GO REPORT ERROR IF ON INACTIVE LINE. 
se 
aces ; PUSH THE NEW CHARACTER ON THE RESYNC QUE FOR THIS LINE. 
t- 
4430 021632 010304 MOV R3,R4 sCALCULATE BASE ADDRESS OF THE 
4431 021634 006304 ASL R4 3 DATA PATTERN RESYNCH QUEUE 
4432 021636 006304 ASL R4 s CQUEUE IS 4 WORDS LONG) FOR 
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GLOBAL SUBROUTINE - NEWCHR 
4433 021640 062704 004642 ADD #0PRSGB ,R4 s THIS LINE. 
4434 021644 010401 MOV R4,R1 sGET THE BASE OF THE QUEUE. 
4435 021646 016121 000002 MOV 2(R1),CR1)+ sMOVE FROM CHR1 SLOT TO CHRO SLOT. 
4436 021652 016121 000002 MOV 2(R1),CR1)+ sMOVE FROM CHR2 SLOT TO CHR1 SLOT. 
sane 021656 010211 MOV R2,(R1) sPUT NEW CHAR INTO CHR2 SLOT. 
3¢ 
4439 ; CHECK THE DATA.VALID FOR THE CHARACTER AT THE BOTTON OF THE QUEUE. 
4440 ; IF DATA.VALIO IS CLEAR, EXIT THE ROUTINE--NOTHING TO ANALYZE. 
4441 i 
4442 021660 011402 MOV CR4),R2 sGET CHRO VALUE, SET FLAGS. 
coe 021662 100112 BPL 60$ sEXIT ROUTINE IF DATA.VALIO IS CLEAR. 
3¢ 
rr ; TEST FOR ANY OF THE ERROR BITS SET IN CHRO. 
4447 021664 032702 070000 BIT #70000 ,R2 sTEST FOR ANY CHRO ERROR BITS SET. 
pore 021670 001427 BEQ 2s sSKIP THIS ERROR IF NO ERROR BITS SET. 
4450 ve HAVE AT LEAST ONE ERROR FLAG SET ON THE RECEIVED CHAR. 
een ; REPORT DATA ERROR FLAG ERROR IF NOT IN SUMMARY MODE. 
8° 
4453 021672 005367 000216 DEC 70% sSET THE “ERROR FOUND” FLAG. 
4454 021676 016300 005234 MOV TXRXLBCR3),RO ;GET THE TX LINE OFFSET FOR THIS RX LINE. 
4455 021702 036067 002364 160570 BIT BITTBLCRO),ERSMRF gt THE ERROR SUMMARY FLAG FOR TX LINE. 
4456 021710 001017 BNE 2s sIF ERROR SUMMARY FLAG SET, SKIP NEXT REPORT. 
4457 021712 012767 014770 163402 MOV #ER9003 , ERRBLK }SELECT THE ER9003 ERROR REPORT ROUTINE. 
4458 021720 004767 004326 JSR PC, TXROFF sTURN OFF TX AND RX DURING ERROR REPORTING. 
4459 021724 ERROR 5 >>>>> ERROR <<<cc, 
021724 104460 TRAP CSERROR 
4460 021726 012767 000001 160270 MOV #1,FERROR sINDICATE AN ERROR HAS BEEN FOUND. 
4461 021734 032767 000100 160220 BIT @BITO6 , OPTION sHAS EXTENDED ym REPORTING BEEN REQUESTED ? 
pee | 021742 001462 BEQ 60% sEXIT IF IT HASN'T 
pose 021744 004767 004342 JSR PC, TXRON 3TURN TX AND RX BACK ON. 
+ 
ant ; CHECK THE CHARACTER AT THE BOTTOM OF THE RESYNC QUE FOR DATA ERRORS. 
ge 
4468 021750 004767 174636 2s: JSR PC,.CKCHR sCHECK THE CHRO CHAR FOR ERRORS. 
oats 021754 103433 BCS 6% sSKIP ERROR REPORT IF CHRO IS CORRECT. 
3¢ 
oath 3; WE HAVE SOME SORT OF DATA ERROR SO REPORT IT CUNLESS IN SUMMARY REPORT MODE). 
4473 021756 005367 000132 as: DEC 70% sSET THE “ERROR FOUND” FLAG. 
4474 021762 016300 005234 MOV TXRXLBCR3),RO 1GET THE TX LINE OFFSET FOR THIS RX LINE. 
4475 021766 036067 002364 160504 BIT BITTBLCRO),ERSMRF ;CHECK THE ERROR SUMMARY FLAG FOR THIS LINE. 
4476 021774 001023 BNE 6% sSKIP ERROR REPORT IF ERROR SUMMARY FLAG SET. 
4477 021776 012767 014612 163316 MOV @ER9002 , ERRBLK }SELECT THE ER9002 ERROR REPORT ROU INE. 
4478 022004 005267 163306 INC ERRNBR sSELECT INITIAL ERRNBR « 1. 
4479 022010 004767 004236 JSR PC, TXROFF sTURN OFF TX AND RX DURING ERROR REPORTING. 
4480 022014 ERROR ; >>>>> ERROR <<<cc, 
022014 104460 TRAP CSERROR 
4481 022016 012767 000001 160200 MOV #1,FERROR s INDICATE AN ERROR HAS BEEN FOUND. 
4462 022024 032767 000100 160130 BIT @BIT06 ,OPTION sHAS EXTENDED ye REPORTING BEEN REQUESTED ? 
4483 022032 001426 BEQ 60% sEXIT IF IT HASN'T 
4485 022034 004767 004252 JSR PC, TXRON ;TURN TX AND RX BACK ON. 
4486 022040 005367 163252 DEC ERRNBR sRESTORE INITIAL ERRNBR. 
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- NEWCHR - 


160064 
160370 


B10 


s COUNT A CHARACTER ERROR IF ONE OCCURRED. 
s UPDATE THE "REPORT ERROR SUMMARY” FLAG FOR LINE BASED ON ERROR COUNT. 


3 - 

63: 1ST 708 sCHECK THE “ERROR FOUND” FLAG. 
BEQ 608 sSKIP COUNTING AN ERROR IF FLAG IS CLEAR. 
INC  ERCNTBC(R3) sINCREMENT THE ERROR COUNTER FOR THIS LINE. | 
BNE 8s sSKIP SETTING COUNTER TO MAX IF NO OVERFLOW. 
DEC  ERCNTB(R3) sRESET THE ERROR COUNTER TO -1 (MAX VALUE). 

83: TST NOERPT sDISABLE ERROR SUMMARY FUNCTION IF 
BEQ 608 ; NUMBER OF DATA ERRORS TO REPORT IS 0. 
CMP = ERCNTB(R3),NOERPT ;COMPARE ERROR COUNT WITH @ OF ERR’S TO RPT. | 
BLO 608 sSKIP SETTING OF SUMMARY FLAG IF NOT TOO MANY. 
BIS  BITTBL(R3),ERSMRF ;SET “PRINT ERROR SUMMARY” FLAG FOR LINE. 

608: PASS ;RESTORE GPRS. 

JSR PC, a(SP)+ sRETURN TO PREGOS SUBRT. 

RTS PC 

708: .WORD 0 sLOCAL STORAGE FOR ERROR OCCURRED FLAG. 


rAD 
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GLOBAL SUBROUTINE OOPS 
4507 -SBTTL GLOBAL SUBROUTINE - OOPS - 
4508 BOF SEHESHESEHESESEEEOEASEHASALESESHEEEEEASSESEESEEESOEEEEESEESEEHESEEESEEEAEEEEEEOEEES 
4509 3¢ - PROGRAM ABORT SUBROUTINE - 
4510 3% THIS SUBROUTINE IS USED TO ABORT THE PROGRAM WHEN A FATAL ERROR IS 
4511 36 DETECTED IN THE PROGRAM OR THE HOST SYSTEM HARDWARE. AN ERROR MESSAGE 
mt | . IS PRINTED GIYING SOME INFORMATION ABOUT THE NATURE OF THE ABORT. 
451 
is vs INPUTS: Ri - ERROR CODE GIVING REASON FOR ABORT. 
451 
4516 . OUTPUTS: AN ERROR MESSAGE IS PRINTED. 
pis 34 A LIST OF RETURN PC VALUES FOR ALL SUBROUTINE CALLS IS PRINTED. 
451 36 
4519 3@ CALLING SEQUENCE: JSR PC ,OOPS 
4520 34 
4521 3¢ COMMENTS: 
4S22 34 
4523 3@ SUBORDINATE ROUTINES CALLED: NONE. 
4524 B-— SSHAHSSEHSSSSSHSHASEESESSHSEHESHEEESESEOSEHSEEEEEEEEEOESEAEESEESEEEEEEEEEEEEEESD 
4525 
4526 022116 OOPS:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
022116 004567 163202 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
4527 3 REPORT “HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED.” ERROR. 
4528 022122 ERRSF 101,€M0101 
022122 104454 TRAP CSERSF 
022124 000145 ~ WORD 101 
022 022162 .WORD EM0101 
022130 - WORD 0 
4529 3s REPORT “PROGRAM HUNG, WAITING FOR A CONTROL-C.” 
4530 022132 PRINTF ¢£M0102 
022132 012746 022246 MOV #€M0102, -C SP) 
022136 012746 000001 MOV #1,-C(SP) 
022142 010600 MOV SP ,.RO 
022144 104417 TRAP  CSPNTF 
022146 062706 000004 ADD 04 ,SP 
4531 022152 2%: BREAK ;LOOK FOR OPERATOR CONTROL-C INPUT. 
022 104422 TRAP CsBRK 
4532 022154 000776 BR 2s s INFINITE LOOP. 
4533 022156 608: PASS 300N‘'T NEED THIS, BUT SOMEBODY MAY CHANGE THIS 
022156 004736 JSR PC, @CSP)-+ sRETURN TO PREGOS SUBRT. 
a 022160 000207 RTS PC ry ROUTINE IN THE FUTURE, SO BE CONSISTANT. 
4536 022162 110 117 123 EMO101:: .ASCIZ /HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED. / 
022165 124 040 103 
022170 117 115 120 
022173 125 124 105 
022176 122 040 110 
022201 101 122 104 | 
022204 127 101 122 
022207 105 040 117 
022212 122 040 123 
022215 117 106 124 
022220 127 101 122 
022223 105 040 102 
022226 125 107 040 
022231 105 116 103 
022234 117 125 116 
022237 124 105 122 
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4537 


4538 


022242 


104 
116 
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OOPS - 


0S6 
045 EM0102:: .ASCIZ /SNSAPROGRAM HUNG, WAITING FOR A CONTROL -C. 


- EVEN 


(666660606666405NEN/ 


SEQ 120 


| 


A 
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GLOBAL SUBROUTINE - PRFRME | 
4540 -SBTTL GLOBAL SUBROUTINE - PRFRME - | 
4541 EOF SHOSSSAEHESAESEEAEHEASEEASEHAEAEEEEEEEEEEEESASEHAOEEEEAEESERESEEAEEEEEEEEEEEESEBES | 
4542 34 - PROCESS FRAMING ERRORS - 
4543 +4 THIS SUBROUTINE IS USED IN THE FRAMING ERROR BIT TEST, TO VERIFY THAT 
4544 34 8LL RECEIVED aman HAVE THEIR FRAMING ERROR BIT SET AND PARITY 
aeae 3% u..ROR BIT CLEAR 
oe 
4547 - INPUTS: R2 - CONTAINS THE CHARACTER READ FROM THE FIFO. 
4548 34 ERRNBR - ERROR NUMBER OF ERRORS IN THIS ROI'TINE. 
pind 3¢ ERSMRF - “REPORT ERROR SUMMARY ~“° ' INE” FLAGS 
3% 
4551 3@ OUTPUTS: ERRBLK - THE CONTENTS OF THIS WORD ARE DESTROYED. 
4SS2 34 ERCNTB - THE ERROR COUNT FOR THIS LINE IS UPDATED. 
oans 34 MESSAGES MAY BE PRINTED AT THE OPERATORS CONSOLE. 
te 
4s55 3% 
ast 3@ CALLING SEQUENCE: JSR PC ,PRFRME 
34 
4558 3@ COMMENTS: THIS ROUTINE REPORTS ERRORS WITH INITIAL NUMBER. 
4559 34 ERRNBR IS RESTORED TO ITS INITIAL VALUE BEFORE THIS SUBROUTINE 
4560 34 RETURNS. 
4561 3* 
4562 3@ SUBORDINATE ROUTINES CALLED: ER6201. 
4563 B--— SHSSSSSHASSASEEHOEEASEHESSESEEEEEESEEEEEEEEEEOESEOE4EEEEEE44E4E666646666664664640468 
4564 
4565 022344 PRFRME : : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
022344 004567 162754 JSR RS, PREGOS sCALL REGISTER SAVE SUBRT. 
4566 022350 016704 162742 MOV ERRNBR ,R4 : SAVE THE CONTENTS OF THE INITIAL ERROR NUMBER. 
po atl 022354 005005 CLR RS sCLEAR ERROR/MESSAGE FLAGS. 
4569 3° 
4570 s TEST FRAMING AND PARITY ERROR BITS IN TURN. REPORT ANY ERRORS FOUND, IE. 
pete 3 FRAMING ERROR BIT CLEAR, OR PARITY ERROR BIT SET. 
g 
4573 022356 012767 014254 162736 MOV @ER6201,ERRBLK ;,SET UP THE ADORESS OF THE ERROR ROUTINE. 
4574 022364 032702 020000 BIT #6IT13,R2 sCHECK ON STATE OF THE FRAMING ERROR BIT. 
4575 022370 001002 BNE 6% sBRANCH IF FRAMING ERROR BIT SET. 
pe ta 022372 052705 000002 BIS @6IT1,R5 SSET REPORT FRAMING ERROR FLAG. 
4578 022376 032702 010000 6%: BIT #61T12,R2 sCHECK ON THE STATE OF THE PARITY ERROR BIT. 
4579 022402 001402 BEQ 8s sBRANCH IF PARITY ERROR BIT CLEAR. 
4580 022404 052705 000014 BIS #14,R5 sSET nes / ag 3a ERROR SET” FLAGS. 
4581 022410 005705 8%: TST ake ae ANY ERROR FLAGS SET. 
4562 022412 001412 BEQ EXIT IF .- ba bee CLEAR. 
4583 022414 036367 002364 160056 BIT BITTBLCAS), ERSMRF sCHECK THE ERROR SUMMARY FLAG FOR THIS LINE. 
i ee 001004 BNE 10% sSKIP ERROR REPORT IF ERROR SUMMARY FLAG SET. 
4586 sREPORT ERROR “CHARACTER RECEIVED WITH PARITY/FRAMING ERROR BIT SET”. 
4587 022424 ERROR 3 >>>>> ERROR <<<<<, 
nes 022424 104460 TRAP CSERROR 
chee 022426 012767 000001 157570 MOV #1,FERROR sINDICATE AN ERROR HAS BEEN DETECTED. 
4591 022434 005263 003302 108: INC ERCNTBCRS) s INCREMENT ERROR COUNT FOR THIS LINE. 
4592 022440 010467 162652 60%: MOV R4,ERRNBR sRESTORE ERROR NUMBER. 
4593 022444 PASS getsvons GPRS. 
022444 004736 JSR PC,.@CSP)-+ sRETURN TO PREGOS SUBRT. 
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4594 022446 000207 RTS PC 


SEQ 122 


| 
G10 | 
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GLOBAL SUBROUTI PRPARE 
4596 -SBTTL GLOBAL SUBROUTINE - PRPARE - 
4597 2+ SHASHAEAAEHEEHESHASASESREAEEESEAEAEEEEEEESEEEEEEESEAEAEERESAEEELEREEEEEREEEEEERSE 
4598 3% - PROCESS PARITY ERRORS - 
4599 34 THIS SUBROUTINE IS USED IN THE PARITY ERROR TEST, TO VERIFY THAT 
4600 34 ALL RECEIVED CHARACTERS HAVE THEIR PARITY ERROR BIT SET AND FRAMMING 
oean 34 ERROR BIT CLEAR. 
34 
4603 3@ INPUTS: R2 - CONTAINS THE CHARACTER READ FROM THE FIFO. 
4604 34 R3 - CONTAINS 2 * LINE NUMBER OF THE READ CHAR. 
4605 34 ERRNBR - ERROR NUMBER OF ERRORS IN THIS ROUTINE. 
4606 3¢ ERSMRF - "REPORT ERROR SUMMARY FOR LINE” FLAGS. 
roa44 3% FERROR - “AT LEAST ONE ERROR FOUND” FLAG. 
34 ‘ 
4609 3* OUTPUTS: ERRBLK - THE CONTENTS OF THIS WORD ARE DESTROYED. 
4610 3% ERCNTB - THE ERROR COUNT FOR THIS LINE IS UPDATED. 
saith ’ 3% MESSAGES MAY BE PRINTED AT THE OPERATORS CONSOLE. 
i 34 
4613 3¢ 
sata 3# CALLING SEQUENCE: JSR PC ,PRPARE 
3% 
4616 3@ COMMENTS: THIS ROUTINE REPORTS ERRORS WITH INITIAL ERRNBR THRU ERRNBR+1. 
arp 34 peo IS RESTORED TO ITS INITIAL VALUE BEFORE THIS SUBROUTINE 
34 RETURNS. 
4619 se THE CONTENTS OF THE ERRBLK ARE DESTROYED. 
4620 3¢ 
4621 s@ SUBORDINATE ROUTINES CALLED: ER9002,ER6201. 
4622 8-- 666606606666 66660646666646866660606660666 600060 6066060666660666666666066600664640664 
4623 
4624 022450 PRPARE : : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
022450 004567 162650 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT 
4625 022454 016746 162636 MOV ERRNBR , -( SP) SAVE THE CONTENTS OF THE INITIAL ERROR NUMBER. 
4627 05005 CLR RS sCLEAR ERROR/MESSAGE FLAGS. 
4628 3¢ 
4629 s TEST FRAMMING AND PARITY ERROR BITS IN TURN. REPORT ANY ERRORS FOUND, IE. 
ant 1 PARITY ERROR BIT CLEAR, OR FRAMMING ERROR BIT SET. 
;- 
4632 022462 012767 014254 162632 MOV #ER6201,ERRBLK ;SET UP THE ADDRESS OF THE ERROR ROUTINE. 
4633 022470 032702 010000 BIT @BIT12,R2 sCHECK ON STATE OF THE PARITY ERROR BIT. 
4634 022474 001002 BNE 66 sBRANCH IF PARITY ERROR BIT SET. 
4635 022476 052705 000010 BIS #BITS,.R5S iSET REPORT PARITY ERROR FLAG. 
4636 022502 032702 020000 6%: BIT #B8IT13.R2 sCHECK ON THE STATE OF THE FRAMMING ERROR BIT. 
4637 022506 001402 BEQ 8s sBRANCH IF FRAMMING ERROR BIT CLEAR. 
4638 022510 052705 000003 BIS @3,&5 sSET REPORT “FRAMMING ERROR SET” FLAGS. 
4639 022514 005705 83: TST RS sCHECK IF ANY ERROR FLAGS SET. 
4640 022516 001414 BEQ 12% sBRANCH TO MAKE DATA CHECK IF ALL FLAGS CLEAR. 
4641 022520 036367 002364 157752 BIT + + cece ERSMRE sCHECK THE ERROR SUMMARY FLAG FOR THIS LINE. 
4642 022526 001055 BNE sSKIP ALL ERROR REP IF IN ERROR SUMMARY MODE. 
4643 sREPORT ERROR “CHAR RECEIVED WITH PARITY/FRAMMING ERROR BIT SET/CLEAR”. 
4644 022530 .ERROR >>>>> ERROR <<<<<, 
— 022530 104460 a TRAP CsERROR 
4646 022532 012767 000001 157464 a MOV #1,FERROR sINDICATE AN ERROR HAS BEEN FOUND. 
4647 022540 032767 000100 157414 a* BIT @BITO6 ,OPTION sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
4648 022546 001440 Py BEQ 18% sEXIT IF IT HASN'T. 
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012701 
012767 


104460 
012767 


005263 
012667 


004736 
000207 


162542 
003402 


177400 


H10O 
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- PRPARE - 


157674 
157670 


162466 


157360 


s COMPARE ACTUAL DATA WITH EXPECTED DATA TO CHECK FOR MULTIPLE ERRORS. 


hee 
12%: 


14%: 


ERRNBR s INCREMENT ERROR NUMBER. 

RXPTRBCR3),R4 iGET THE POINTER TO EXPECTED DATA. 
(R4),R4 sGET THE EXPECTED DAT 

#177400 ,R4 CL THE UPPER BYTE. 

R2,R4 sCOMPARE ACTUAL AND EXPECTED DATA. 

18% sSKIP ERROR REPORT IF DATA CORRECT. 


#6IT15,R4 sCLEAR “NONE” EXPECTED MESSAGE FLAG. 

«Hpac paar’ sCHECK THE ERROR SUMMARY FLAG FOR THIS LINE. 

16 IP ERROR REPORT IF ERROR SUMMARY FLAG SET. 

BrTTaLcRs), RXDONF s CHECK FOR RECEPTION oars ON THIS |.INE. 
»SKIP SETTING NONE EXPECTED FLAG. 

eeIT15, ua sSET “NONE” EXPECTED MESSAGE FLAG. 

#€M9008 ,R1 ;SELECT ERROR MESSAGE TO BE REPORTED. 

#ER9002,ERRBLK ;SELECT ERROR REPORTING ROUTINE. 

ERROR"RECEIVE CHARACTER MISCOMPARE” 


TRAP CSERROR 


#1,FERROR sINOICATE AN ERROR HAS BEEN FOUND. 
ERCNTBCR3) s INCREMENT ERROR ot FOR THIS LINE. 
CSP )+,ERRNBR sRESTORE ERROR NUMBER 

sRESTORE GPRS. 


JSR PC, @(SP)+ 
PC 


sRETURN TO PREGOS SUBRT. 


SEQ 124 


I10 
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4710 022736 
022736 
4711 022740 


162440 
157310 
157310 
177760 
157330 


012140 
007162 
000003 


000010 


-SBTTL GLOBAL SUBROUTINE - PRTLPR - 

tee en ae Cr ne ae Maar Cae ee 
34 -PRINT THE CONTENTS OF THE L 

3% THIS ROUTINE 1S USED TO PRINT OUT EXTENDED ENF ORMATION ON THE 

34 CONTENTS OF THE LINE PARAMETER REGISTER (LPR). 

34 

3* INPUTS: R3_ - CONTAINS THE NUMBER OF THE LINE YOU WISH TO EXAMINE. 

3* CSRA - CONTAINS THE ADDRESS OF THE DUT’S CSR. 

34 IESTAT - CONTAINS THE CURRENT STATUS OF THE TX AND RX INTERRUPT 
i* ENABLE BITS IN THE DUT'S CSR. 

34 LPRA - CONTAINS THE ADDRESS OF THE DUT’S LPR REGISTER. 

3% 

3* OUTPUTS: AN EXTENDED INFORMATION MESSAGE IS PRINTED ON THE OPERATORS 

3* CONSOLE. 


3% 
3# CALLING SEQUENCE: JSR PC,PRTLPR 


34 
3# COMMENTS: THIS ROUTINE CHANGES THE INDIRECT ADORESS FIELD OF THE DEVICE 
3¢ UNDER TEST’S CSR. 


3% 
3# SUBORDINATE ROUTINES CALLED: NONE. 
B-~-— SOSSSHSHHSSAASSEESESEAAASSSASSSESESESSEESSESEHESESEEESSSEEEEEEEEEEEEEEEESEEEEEEE 


PRTLPR: : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS, PREGOS sCALL REGISTER SAVE SUBRT. 
MOV CSRA,R1 i1GET THE CSR ADDRESS. 
MOV LPRA,R2 sGET THE LPR ADORESS. 
BIC €177760,R3 sCLEAR ANY UNWANTED BITS. 
BIS IESTAT,R3 1SET STATE OF TX AND RX INTERRUPT ENABLE BITS. 
MOV R3,CR1) sSELECT LINE 


MOV CR2),R4 iGET CONTENTS OF THE LPR. 
sPRINT MESSAGE “CONTENTS OF THE LPR:NNNNNN” 
PRINTX @€F 9019, 0EM9026,R4;PRINT OUT MESSAGE ON a es 


608: PASS sRESTORE GPRS. 
are pe JSR PC, @CSP)+ sRETURN TO PREGOS SUBRT. 


| 
SEQ 125 








J10 


4760 
4761 023022 


iCARRY BIT, SET INDICATES FIFO PURGED. 


OHU-11 FUNCTIONAL VERIFICATION MACRO M1200 12-DEC-83 16:16 PAGE 83 SEQ 126 
GLOBAL SUBROUTINE PUFIFO - 
4713 -SBTTL GLOBAL SUBROUTINE - PUFIFO - 
4714 I SHAAAARAEKARERESADESEARAREAEEERASEERARERSEEEREAAEEEEEAEEACEEEESEEEAEEEEEEEEEEEEREES 
4715 3% - PURGE THE FIFO 
4716 34 THIS ROUTINE TRIES TO REMOVE ALL THE CHARACTERS FROM THE FIFO. 
rid 3% ANY BMP CODES THAT ARE FOUND ARE SAVED ON THE BMP CODE QUEUE. 
471 3% 
ates 3* INPUTS: RBUFA- CONTAINS THE ADDRESS OF THE RECEIVER. 
34 
4721 3% 
4722 3# OUTPUTS: CARRY BIT - INDICATES THE STATE OF THE FIFO, SET:= PURGED. 
a788 34 BMPCQ - THE CONTENTS OF THE BMP CODE QUEUE MAY BE UPDATED. 
a 3% 
4725 3@ CALLING SEQUENCE: JSR PC ,PUFIFG 
4726 34 
4727 3@ COMMENTS: 
4728 +* 
4729 3# SUBORDINATE ROUTINES CALLED: SAVBMP. 
4730 F SSAHASSSALASSSSEESSEASHAEESSASESEEESEEESLAEEEEEEESEEEEAEEELESEEEEEEEEEEEEEEEEEEEE 
4731 
4732 022742 PUF IFO: : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
022742 004567 162356 JSR RS, PREGOS sCALL REGISTER SAVE SUBRT. 
4733 022746 012701 001000 MOV #512. ,R1 sSET MAXIMUM TRY COUNT OF 512 
pit ad 022752 016704 157224 MOV RBUFA,R4 sGET ADORESS OF THE RECEIVER | BUFFER REGISTER. 
4736 022756 011402 2s: MOV C(R4),R2 sGET THE CONTENTS OF THE RECEIVER BUFFER REG. 
avee 022760 100016 BPL 6% sEXIT IF THE FIFO IS EMPTY, DATA_VALID CLR. 
3¢ 
4739 : CHECK IF THE READ CHARACTER IS ACTUALLY A BMP CODE. 
rte s IF IT IS, THEN SAVE IT ON THE BMP CODE QUEUE TO BE REPORTED LATER. 
4742 022762 012700 070000 ; MOV #70000 ,RO sGENERATE A BIT MAP OF CHAR ERROR BITS 
4743 022766 040200 BIC R2,RO 3s WHICH ARE NOT SET FOR CHAR. 
ohen 022770 001006 BNE At ; THROW CHAR AWAY IF NOT BMP OR SELFTEST CODE. 
+ 
anat CHECK IF THE READ DATA IS MODEM STATUS , BMP OR SELFTEST?. 
t- 
4748 022772 012700 000301 MOV #301,R0 :; CHECK IF BMP. 
4749 022776 BIC R2,RO SRY TO CLEAR BMP FLAGS IN THE READ DAT 
4750 023000 001002 BNE 48 sIF IT IS MODEM OR SELFTEST CODE THROW ti AWAY. 
ores 023002 004767 001644 JSR PC, SAVBMP sSAVE BMP CODE ON THE QUEUE. 
4753 023006 005301 4%: DEC R1 sDECREMENT THE TRY COUNT. 
4754 023010 001362 BNE 2s sLOOP TO TRY AGAIN 
4755 023012 000241 cic sCLEAR CARRY,TO INDICATE FIFO NOT PURGED. 
4756 023014 000401 BR 60% sEXIT WITH CARRY CLEAR. 
4757 023016 000261 6%: SEC sSET CARRY, TO INDICATE FIFO PURGED. 
4759 023020 60%: PASS sRESTORE GPRS, 
023020 004736 JSR PC, @CSP)+ sRETURN TO PREGOS SUBRT. 





ie. 


GLOBAL SUBROUTINE 


K10 
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004567 
016746 
012705 


017702 
100063 


012700 
040200 
001012 


012767 
012700 


040200 
001003 
004767 
000430 


157136 


070000 


014512 
000300 


001552 


-SBTTL GLOBAL SUBROUTINE 


- PUFIFR - 


FSHHASEAHARAASHASEAASADEEAEEEEAASERASEAEHAEAAEEEDEREAREREDEEEEEEEEEEEEEEEEEEEEEE 


3% - PURGE FIFO REPORT ANY ERRORS FOUND. 

3% THIS ROUTINE REMOVES ALL DATA FROM THE FIFO. ANY BMP CODES THAT ARE 
34 FOUND ARE SAVE ON THE QUEVE TO BE REPORTED LATER IN THE BMP REPORT TEST. 
3% ANY UNXEPECTED DATA CIE ANY NON-STATUS INFORAMTION) THAT ARE FOUND, 
3% ARE REPORTED AS AN ERROR. 

3% IF THE FIFO WILL NOT PURGE AFTER 512 ATTEMPTS, THEN THE CURRENT TEST 
34 THAT CALLED THIS ROUTINE RECEIVES A FAILURE FLAG THAT SHOULD BE USED 
34 TO ABORT THE TEST. 

3% 

3* INPUTS: ERRTBL - ERRTYPE, ERRMSG, ERRNBR ARE SET UP CORRECTLY. 

34 RBUFA- CONTAINS THE ADDRESS OF THE RECEIVER. 

3% 

3# OUTPUTS: CARRY BIT - ABORT TEST FLAG, CLR = ABORT TEST, SET = OK. 

34 ERRBLK - VALUE WILL BE DASTROYED. 

3% BMPCQP - THE BMP CODE QUEVE POINTER MAY BE UPDATED. 

34 THE CONTENTS OF THE BMP CODE QUEUE MAY BE UDATED. 


* 
3# CALLING SEQUENCE: JSR 


PC ,PUFIFR 


* 
3@ COMMENTS: THIS ROUTINE REPORTS ERRORS WITH NUMBERS INITIAL ERRNBR 


34 THRU TO ERRNBRe2. 
3% THE ERRNBR IS RESTORED TO ITS INITIAL VALUE BEFORE RETURNING. 


3% 
3# SUBORDINATE ROUTINES CALLED: 


ER1603,ER9001 ,ER9002, SAVBMP. 


SEP ERKEAEHEEHARERAEEHARARAHAAEEEAAHHAEKESSAAGAAAGHHAESAGHHADEAAEEHARKHAKLHEK EK KERED 


PUFIFR: : SAVE 


JSR 
MOV ERRNBR , -C SP) 
MOV #512. ,R5 


READ DATA FROM THE FIFO UNTIL 
REPORT ANY BMP OR UNEXPECTED 


$: MOV —- BRBUFA, R2 
BPL 8$ 
. 
; CHECK IF READ DATA IS STATUS 
7 
MOV #70000, RO 


sSAVE CONTENTS OF GPRS RO THRU RS. 
RS, PREGOS sCALL REGISTER SAVE = aa 
sSAVE THE CONTENTS OF THE ERROR NUMBER 

sSET MAXIMUM READ COUNTER TO 2eFIFO SIZE. 


DATA VALIO IS CLEAR OF READ COUNTER IS ZERO. 
DATA AS ERRORS. 


sGET THE CONTENTS OF THE RECEIVER BUFFER REG. 
sEXIT IF DATA VALID CLEAR, IE. FIFO PURGED. 


OR UNEXPECTED CHARACTER. 
sGENERATE A BIT MAP ) CHAR ERROR BITS 


s WHICH ARE NOT SET 
sSKIP BMP CHECK IF na IS UNEXPECTED DATA. 


3° 
s CHECK IF THE READ DATA IS MODEM STATUS , +H SELFTEST?. 


sSET UP THE CORRECT ERROR REPORTING ROUTINE. 
s_ CHECK IF BMP OR SELFTEST?. 

STRY TO CLEAR BMP FLAGS IN THE READ DATA. 

sSKIP BMP ERROR REPORT IF MODEM OR SELFTEST?. 

sSAVE THE BMP CODE ON THE QUEUE. 


BIC R2,RO 
BNE st 
; IF IT IS A BMP CODE THEN SAVE IT ON THE 
i- 
162236 MOV #€R9001 , ERRBLK 
MOV #300 ,RO 
BIC R2,RO 
BNE ae 
JSR PC, SAVBMP 
BR 6% 


sBRANCH TO CHECK READ COUNT. 


3° 
s CHECK IF THE READ DATA IS MODEM, SELFTEST OR UNEXPECTED DATA. 


SEQ 127 
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023102 


032702 


S26 
012767 


104460 


032767 
001415 
005367 


005305 
001325 


000001 
012531 


177760 


100000 
162160 
014612 


000100 


162134 


000002 
014162 
011733 


162074 


Lio 
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162156 


157006 


162122 
162120 


4$: 


68: 


3¢ 
3: EXIT WITH 


BIT #BITO,R2 
6$ 


MOV #EM9104 ,R1 
MOV R2,R3 


R3 

BIC oe 

BIS #BIT15,R4 
ERRNBR 

#ER9002 , ERRBLK 


sTEST THE MODEM STATUS INDICATION BIT. 

s00 NOT REPORT ANY ERROR IF MODEM STATUS. 
sPASS THE CORRECT ERROR MESSAGE TO REPORT. 
sEXTRACT THE LINE NUMBER FROM 

; THE READ DATA. 


iFORM LINE NUMBER TIMES 2 FOR rote ROUTINE. 
iSET THE “NONE” EXPECTED MAESSAGE FLAG. 

sSET ERROR NUMBER TO INTIAL ERRBRe1. 

sSELECT THE CORRECT ERROR REPORTING ROUTINE. 


MO 
sREPORT ERROR “UNEXPECTED DATA FOUND IN FIFO”. 


BIT OB ITO6 , OPTION 
BEQ 7% 


DEC ERRNBR 
DEC RS 
BNE 2s 


3 >>>>> ERROR <<<<<, 
TRAP CsERROR 


FAILURE IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 


sEXIT WITH TEST FAILURE MESSAGE IF 
sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
sDURING THE SOFTWARE QUESTIONS. 


:RESTORE ERROR NUMBER TO INTIAL ERRNBR. 


sDECREMENT READ COUNTE 
sLOOP TO READ NEXT CHAR "FROM FIFO IF COUNT > 0. 


3¢ 
; THE FIFO WILL NOT CLEAR, REPORT THE ERROR AND INDICATE THAT THE TEST IS TO 
; BE ABORTED. 


7$: 


108%: 
60%: 


ADD #2, ERRNBR 
MOV #ER1603, ERRBLK 


MOV #€M9017,R1 
sREPORT THE ERROR “FIFO 
é 
ERROR 
CLC 
BR 10% 
SEC 


MOV CSP )+, ERRNBR 
PASS 
JSR 


RTS PC 


sSET ERROR NUMBER TO INTIAL ERRNBR:e2. 
sSELECT THE CORRECT ERROR REPORTING ROUTINE. 
sPASS THE MESSAGE TO BE REPORTED. 
WILL NOT PURGE, CDATA VALID STUCK SET)” 
ata TEST ABORTED”. 

>>>>> ERROR <<<c<, 

TRAP CSERROR 

sINDICATE THE TEST IS TO BE ABORTED. 
sEXIT THIS ROUTINE AND ABORT THE CURRENT TEST. 


sSET THE CARRY, DO NOT ABORT THE TEST. 


sRESTORE INITIAL ERROR NUMBER. 
sRESTORE GPRS, 


PC,@(SP)+ sRETURN TO PREGOS + al 


sCARRY BIT, = INDICATES FIFO PURGED, 0O NO 
3 ABORT THE TEST 
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004567 


012701 
012721 
012721 


005021 
020127 
101774 


004736 
000207 


162072 
002712 
002720 
002720 


003120 


M10 
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-SBTTL GLOBAL SUBROUTINE 


toe she eee oe oy ye ge ees 





- PURRXB - 


34 PURGE THE RX BUFFER IN MEMORY ROUTINE - 

3% THIS SUBROUTINE Is USED BEFORE THE BEGINNING OF A TX/RX OF DATA 
74 PATTERNS TO CLEAR OUT THE RX BUFFER AND TO INITIALIZE THE VARIOUS 
3* COUNTERS AND POINTERS RELATED TO THAT BUFFER. 

3* 

3* INPUTS: RXBSTA - LABEL AT THE BEGINNING OF THE RX BUFFER. 

3% 

3* OUTPUTS: RXBCNT - COUNT OF @ OF CHARS IN RX BUFFER (CLEARED). 

34 RXBIPT - INPUT POINTER TO RX BUFFER CINITIALIZED). 

3% RXBOPT - OUTPUT POINTER TO RX BUFFER CINITIALIZED). 

34 THE CONTENTS OF THE RX BUFFER ARE CLEARED. 

;* 


3# CALLING SEQUENCE: JSR 
* 
3* COMMENTS: 


PC ,PURRXB 


3% 
3# SUBORDINATE ROUTINES CALLED: NONE. 


F-- SHHRESHHSAHSAAESASSSASAASASESSSSASESSEKRERESESASEASESEEEEEAEEEAEEEEEEEEEEEEEE 


PURRXB:: SAVE 
JSR 


MOV @RXBOPT ,R1 
MOV @RXBSTA,CR1)+ 
MOV @RXBSTA,CR1)+ 


2s: CLR (R1)+ 
CMP R1, ORXBEND 
BLOS 
60% PASS 
JSR 
RTS PC 


sSAVE CONTENTS OF GPRS RO THRU RS. 
RS ,PREGOS sCALL REGISTER SAVE SUBRT. 


sGET THE ADDRESS OF THE RX OUTPUT POINTER. 
sINITIALIZE THE RX BUFFER OUTPUT POINTER. 
sINITIALIZE THE RX BUFFER INPUT POINTER. 
sCLEAR CHAR COUNT ANDO THE BUFFER AREA. 
sCHECK IF LAST LOCATION HAS BEEN CLEARED. 
sLOOP IF NOT DONE. 


sRESTORE GPRS. 
PC, @(SP)-+ sRETURN TO PREGOS SUBRT. 


| 
| 
SEQ 129 


: 


N10 


, 
| 


4951 023344 062701 000062 ADD #50. ,R1 sADD SO MILLI SEC TO DELAY IF NOT LAST CHAR. 
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GLOBAL SUBROUTINE ROCHRS 
4896 -SBTTL GLOBAL SUBROUTINE - ROCHRS - 
4897 zoe erate og ge Ay tee yy me oo a ata arilae 
4898 3% READ AND COMPARE INPUT CHARACTERS ROUTINE - 
4899 3% THIS SUBROUTINE READS THE CHARACTERS FROM THE RX BUFFER IN MEMORY. 
4900 3% IF CHARACTERS STOP APPEARING IN THE BUFFER WITH DATA.VALID SET 
4901 3% OR IF MORE THAN THE ALLOWABLE NUMBER OF CHARACTERS HAS BEEN READ FROM 
4902 34 THE BUFFER THIS ROUTINE EXITS WITH AN RX COMPLETE INDICATION. 
ene 3% EACH READ CHAR IS ANALYZED AND ANY NECESSARY ERRORS ARE REPORTED. 
3% 
4905 3* INPUTS: ACTLNS - BIT MAP OF THE ACTIVE DUT LINES. 
4906 3% ERRNBR - SET TO ERROR NUMBER OF FIRST ERROR IN THIS ROUTINE. 
4907 3% I6M - MASK OF THE INACTIVE BITS IN A TX OR RX CHAR BYTE. 
4908 3* OSTEND - ADDRESS OF THE END OF THE OUTPUT STORAGE FIFO BUFFER. 
4909 3% OSTPTR - POINTER TO THE NEXT BYTE TO READ FROM OSTORE. 
4910 3% RXBOPT - POINTER INTO THE RX CHAR BUFFER IN MEMORY. 
pig 34 RXTOUT - TIME-OUT VALUE FOR RX OF LAST CHAR. 
3% 
4913 3# OUTPUTS: ERROR MESSAGES MAY BE PRINTED AT THE OPERATOR'S CONSOLE. 
4914 34 TXDBLF - TX/RX DISABLED FLAG (CLEARED). 
4915 34 TXENBM - TX.ENABLE STATE MASK (DESTROYED). 
4916 3% SAVPRI - STORAGE FOR PROCESSOR PRIORITY (DESTROYED). 
pst 34 SAVTEN - STORAGE FOR TX.ENABLE STATES (DESTROYED). 
3% 
eae 3# CALLING SEQUENCE: JSR PC, ROCHRS 
& 
4921 ot COMMENTS : THIS ROUTINE REPORTS — WITH NUMBERS INITIAL ERRNBR 
4922 3% THRU INITIAL ERRNBR 
oeat 34 ERRNBR IS RESTORED BEF ORE THIS ROUTINE RETURNS. 
ae 
po i* SUBROUTINES CALLED: Chcre  NEMCHR REPCOD , RXELO RATED. THEMDL. . TAEEO, TXIES. 
& . 
one : —- SHAAESAEEASSESSESESEEEESEAAAEEASERESESASASERESASEEHESESEEAEESERESARAREREAEEE 
4929 023262 ROCHRS:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
023262 004567 162036 JSR RS ,PREGOS sCALL REGISTER = SUBRT. 
4930 023266 016704 162024 MOV ERRNBR ,R4 ; PRESERVE THE INITIAL ERROR NUMBER 
4931 023272 016703 156734 MOV IBM,R3 sGET THE INACTIVE BIT MASK. 
4932 023276 005067 157204 CLR TXDBLF sCLEAR THE TX DISABLED FLAG. 
4933 023302 004767 001320 JSR PC,RXIE1L sTURN ON DUT RECEPTION INTERRUPTS. 
oan 023306 004767 002440 JSR PC, TXIE1 sTURN ON DUT TRANSMISSION INTERRUPTS. 
4936 s¢ 
y ood 3 CLEAR ALL RESYNC QUEUES FOR ALL LINES. 
ge 
4939 023312 012701 004642 MOV @OPRSQB .R1 sGET BASE ADDRESS OF RESYNC QUEUES TABLE. 
4940 023316 012702 005042 MOV @OPRSQE ,R2 sGET END ADDRESS . "ine QUEUES TABLE. 
4941 023322 005021 2s: CLR CR1)+ sCLEAR A WORD OF T 
4942 023324 020102 CMP R1,R2 ;CHECK IF POINTER AT END OF TABLE. 
om? 023326 103775 BLO 2s sLOOP UNTIL TABLE IS CLEAR. 
t¢ 
4945 ; WAIT FOR A CHARACTER TO APPEAR IN THE FIFO. 
rts | s IF NO CHARACTER APPEARS WITHIN TIME-OUT PERIOD: EXIT ROUTINE, WE'RE DONE. 
i- 
4948 023330 016701 156712 4%: MOV RXTOUT,R1 sGET TIME-OUT FOR SLOWEST BAUD RATE IN USE. 
4949 023334 026767 157142 156630 CMP TXDONF , ACTLNS sCHECK FOR TRANSMISSION CONE ON ACTIVE LINES. 
4950 023342 001402 BEQ 6% sSKIP ADDING SO MS DELAY IF TX DONE ALL LINES. 
| 
| 
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GLOBAL SUBROUTI 


023514 
023520 
023522 


052701 
016702 
004767 
103117 


004767 


026727 


012701 


170000 
157332 
003520 


175154 


157110 
157312 
001212 
156642 
157272 


000340 


002054 
157034 


157014 


000001 


070000 


000020 


000020 


161620 


156512 


6%: 


JSR 


11 
1 


#170000,R1 


RXBOPT ,R2 
PC ,WAIBIS 
188 


PC .GETCHR 


sINDICATE TO TEST DATA.VALID BIT. 
sINDICATE TO CHECK MEMORY RECEIVE BUFFER. 
sWAIT FOR RECEIVED CHAR OR TIME-OUT. 

sEXIT ROUTINE IF TIME-OUT, WE'RE DONE. 


sREAD A CHARACTER FROM THE MEMORY BUFFER. 


3° 
s CHECK IF THE TX ISR IS DISABLED. 
s RE-ENABLE RX ISR IF THE SPACE FOR NEW CHARS IS LOW E 


10%: 


TST 


TXDBLF 


10% 
RXBCNT , ORXBE TX 
10% 


10 
al 


@PRIO7 


PC, TXENBL 
XDBLF 
R1 


oRS 
— ORXBETX 


@€9025 ,R1 
#€ROSOS , ERRBLK 


3¢ 
s REPORT ERROR AT INITIAL ERRNBR. ‘ 
s “MORE THAN TWICE THE EXPECTED NUMBER OF CHARACTERS RECEIVED.” 


NOUGH. 
IF THE BUFFER CAN ACCOMODATE MORE CHARS THEN RE-ENABLE TRANSMISSION. 


sCHECK IF TX IS DISABLED. 
sSKIP RX/TX CHECK IF TX NOT DISABLED. 
sCOMPARE BUFFER COUNT WITH LEVEL TO ENABLE Rx. 
sSKIP ENABLE RX IF BUFFER TOO FULL. 
sENABLE RECEPTION INTERRUPTS. 
sGET THE PRESERVED TX.ENABLE STATES. 
sCOMPARE BUFFER COUNT WITH LEVEL TO ENABLE TX. 
sSKIP ENABLING TX IF BUFFER TOO FULL. 
sSAVE THE CURRENT PROCESSOR PRIORITY. 
TRAP CS$GPRI 


MOV RO,R1 
sDISABLE INTERRUPTS. 


MOV @PRIO7 RO 


TRAP CsSPRI 
sENABLE TRANSMISSION. 
sCLEAR THE TX DISABLE FLAG. 
sRE-ENABLE INTERUPTS. 
MOV R1,RO 
TRAP CS$SPRI 


sDECREMENT THE TOTAL CHAR COUNTER. 
sSKIP ERROR IF NOT TOO MANY RECEIVED. 
sSET ERROR NUMBER TO INITIAL ERRNBR. 
SSELECT THE PROPER ERROR MESSAGE. 
sSELECT THE PROPER ERROR REPORT ROUTINE. 


3 >>>>> ERROR <<c<cc, 


TRAP CSERROR 


sINDICATE THAT AN ERROR HAS BEEN FOUND. 
sEXIT THE ROUTINE, WE'RE GIVING UP. 


* DETERMINE IF THE CHARACTER IS DATA OR A STATUS CODE. 


128: 


ERROR 

MOV #1,FERROR 
BR 60% 

MOV #70000 ,RO 

8Ic R2,RO 
BNE 143 


sGENERATE A BIT MAP OF CHARACTER ERROR BITS 
1s WHICH ARE NOT SET FOR THE CHARACTER 
sSKIP REPORTING OF ERROR CODE IF WE HAVE CHAR. 


3° 
s THE DATA IS EITHER A BMP CODE OR A MODEM STATUS CODE. 


PORT THAT THE CODE WAS 


FOUND. 
s ERRORS REPORTED WITH ERROR NUMBERS >>>>> ERRNBR+1 AND ERRNBR+2 <<<c<, 


on 4 


SEQ 131 
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5002 
5003 


023712 


161566 
161562 
000222 
156460 


000100 


161532 
00000 


3 
176010 
156422 


000100 


174726 


000736 
001462 


175742 
156354 
000100 


000400 
000020 


100000 


161400 
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156406 


161524 


156350 


MOV R4, ERRNBR sGET THE ERROR NUMBER PASSED INTO THIS ROUTINE. 
INC ERRNBR sSET ERROR NUMBER TO INITIAL ERRNBR+1. 

JSR PC ,REPCOD sREPORT THE BMP OR MODEM STATUS CHANGE CODE. 
TST FERROR sHAS AN ERROR BEEN DETECTED ? 
BEQ 16$ sNO, THEN BRANCH 

BIT @B8ITO6 ,OPTION SHAS EXTENDED ERROR REPORTING BEEN REQUESTED. 
BEQ 60% sYES, THEN EXIT WITH TEST FAIL MESSAGE. 

BR 16% sBRANCH TO GET THE NEXT CHARACTER. 


3¢ 

3 THE DATA IS A VALID CHARACTER: 

3 COMPARE THE READ DATA WITH THE EXPECTED DATA. 

: UPDATE EXPECTED DATA POINTER. 

3 ERRORS REPORTED WITH ERROR NUMBERS >>>>> ERRNBR+3 AND ERRNBR+4@ <<ccc, 


148: MOV R4,ERRNBR sCALCULATE THE STARTING ERROR NUMBER FOR THE 
ADO @3,ERRNBR s NEXT ROUTINE CALL CINITIAL ERRNBR-+S). 
JSR PC ,.NEWCHR sHANDLE THE NEW DATA CHARACTER. 
TST FERROR sHAS AN ERROR BEEN DETECTED ? 
BEQ 16% sNO, THEN BRANCH. 
BIT @61T06 , OPTION SHAS EXTENDED ERROR REPORTING BEEN REQUESTED. 
BEQ 60% sYES, THEN EXIT WITH TEST FAIL MESSAGE. 


3¢ 

s DONE PROCESSING THIS CHARACTER. 

: READ ANOTHER CHAR FROM THE OUT FIFO. 

s IF DATA.VALIO IS SET, LOOP TO CHECK THE RECEIVED CHARACTER. 
s IF DATA.VALID IS CLEAR LOOP TO WAIT FOR IT SET OR TIME-OUT. 


i6s: JSR —s- PC, GETCHR }READ A CHARACTER FROM THE RX BUFFER. 
acs sé SIF DATA.VALID SET, GO TO CHECK THE RX CHAR. 


as sLOOP TO WAIT CHAR OR TIME-OUT IF BUFFER EMPTY. 


e 
; USE DUMMY CHARACTERS TO FORCE ANALYSIS OF CHARACTERS IN RESYNC QUEUES. 
igs: JSR _—«- PC, RXTEO TURN OFF DUT RX INTERRUPTS. 


JSR PC, TXDONE sCHECK IF TX DONE, TURN OFF DUY TX INTERRUPTS. 
CLR Re sCLEAR THE DUMMY CHARACTER. 
CLR Ri iCLEAR THE LOOP COUNTER 
208: JSR PC ,NEWCHR sFORCE ONE RESYNC QUE CHAR TO BE ANALYZED. 
TsT FERROR sHAS AN ERROR BEEN DETECTED ? 
BEQ 228 3NO, THEN BRANCH. 
BIT #6 IT06,OPTION SHAS EXTENDED ERROR REPORTING BEEN REQUESTED. 
BEQ 608 sYES, THEN EXIT WITH TEST FAIL MESSAGE. 
228; ADO #400 ,R2 sINCREMENT THE LINE NUMBER IN THE DUMMY CHAR. 
INC R1 s INCREMENT THE LOOP COUNTER 
CHPB = R}1, @NUMLNS sTEST FOR LOOP COUNTER EQUAL TO ® OF DUT LINES. 
T 20% sLOOP IF LOOP COUNT IS NOT ALL LINES DONE. 
TsT 1 sCHECK FOR SECOND TIME AROUND OUTER LOOP 
BMI 608 sEXIT IF OUTER LOOP DONE TWICE. 
CLR R2 sCLEAR THE DUMMY CHAR FOR 2ND TIME AROUND LOOP. 
MOV #100000 ,R1 ;CLEAR LOOP COUNT, SET OUTER LOOP FLAG. 
BR 206 sLOOP THE SECOND TIME AROUND OUTER LOOP. 
608%: MOV R4,ERRNBR sRESTORE THE ERROR NUMBER TO ITS INITIAL VALUE. 


[44 
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S059 023716 
023716 004736 
S060 023720 000207 
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PASS 
RTS PC 


JSR 


ef a ea 


sRESTORE GPRS. 
PC, @(SP)-+ 


sRETURN TO PREGOS SUBRT. 


Eid 
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GLOBAL SUBROUTINE ROMAST | 
5062 -SBTTL GLOBAL SUBROUTINE - ROMAST - | 
5063 BOF SHHAHSESSAHEAHADEASESADESEEARAESEAEREEEAEEREEEEEEEELOEEEASESEEESESEEEEEEEERERE 
5064 34 - REPORT DMA_START BIT ERRORS ROUTINE - | 
5065 34 THIS SUBROUTINE CHECKS FOR LINES WHICH HAVE DMA_START BIT ERRORS | 
5066 34 DURING THE JUST COMPLETED DMA TRANSMISSION. IF ANY ARE FOUND, 
ood 34 THEY ARE REPORTED. 
34 
5069 3* INPUTS: ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE FOR THIS ROUTINE. 
5070 3% ERRNBR - ERROR NUMBER OF ERROR REPORTED IN THIS ROUTINE. 
4h] 34 TXINTF - CONTAINS BIT MAP OF LINES WITH DMA_START BIT ERRORS. 
34 
5073 3@ OUTPUTS: ERRBLK ADDRESS OF THE ERROR REPORTING ROUTINE (DESTROYED). 
oe 3% MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 
3¢ 
Sor? 3@ CALLING SEQUENCE: JSR PC,ROMAST 
3% 
te 3@ COMMENTS: IF NO LINES HAVE DMA_START BIT ERRORS, NO MESSAGES ARE PRINTED. 
34 
3# SUBORDINATE ROUTINES CALLED: ER9102. 
5081 B--— SHHSESHSEHSESHSEEASASEESSSESEEEEESEEAESAEASEEEEESESESEEEHSESOEEEEEEEEEEEEEEEE 
5083 023722 ROMAST:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
023722 004567 161376 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
5084 023726 016702 156332 MOV TXINTF ,R2 sGET COPY OF THE DMA_START ERRORS BIT MAP. 
5085 023732 001411 BEQ 60% sEXIT IF NO DOMA_ START ERROR BITS ARE SET. 
5086 s¢ 
308? ' 3 WE HAVE SOME DMA_START BIT ERRORS TO REPORT. 
g@ 
5089 023734 012767 015576 161360 MOV @ER9102,ERRBLK ;SELECT THE ERROR REPORTING ROUTINE. 
oor 023742 012701 012442 MOV €M9102,R1 sINDICATE THAT WE HAVE DMA_START BIT ERROR. 
3° 
Fate | 3 REPORT “DMA_START BIT SET AFTER RESET OR TX.ACTION ... ON LINES(S):” 
5094 023746 , ERROR 3 >>>>> ERROR <<ccc, 
023746 104460 TRAP CSERROR 
5095 023750 012767 000001 156246 MOV #1,FERROR s INDICATE AN ERROR HAS BEEN DETECTED. 
5097 023756 608: PASS sRESTORE GPRS. 
023756 004736 JSR PC, CSP )> sRETURN TO PREGOS SUBRT. 
5098 023760 000207 RTS PC 


Ff a a 
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GLOBAL SUBROUTINE REPCOD - 


| 
| 
SEQ 135 | 
5100 -SBTTL GLOBAL SUBROUTINE - REPCOD - 
S101 BOF SHODAHOEEAEEEEASEEEESEEESEEEESEEEEEEEEEEEEEEESDEEDEONEEEEEEEEEEEEEOEEEEEEEDEE 
5102 3% - ROUTINE TO REPORT ERROR CODE FROM DUT - 
5103 ye THIS ROUTINE REPORTS AN ERROR CODE WHICH HAS BEEN READ FROM THE DUT 
5104 3 FIFO. THE CODE IS CHECKED TO DETERMINE WHETHER IT IS A SELFTEST CODE 
5105 34 AN MODEM STATUS OR A BMP CODE. THIS ROUTINE ASSUMES THAT 
5106 34 THE CODE INOICATES AN ERROR IF A BMP CODE IS FOUND IT IS NOT REPORTED 
eros 34 IMMEDIATELY, BUT IS SAVED ON THE BMP CODE QUEUE TO BE REPORTED LATER 
5109 3@ INPUTS: R2 - CONTAINS THE ERROR CODE COMPLETE WITH FLAGS AND LINE @. 
cae 3% ERRTBL - ERRTYP,ERRNBR,AND ERRMSG SET UP CORRECTLY. 
a 
5112 3@ OUTPUTS ERRBLK - VALUE MAY BE DESTROYED. 
pe 34 BMPCQP - MAYBE UPDATED IF A BMP CODE IS ADDED TO THE QUEUE. 
3% 
ape 3* CALLING SEQUENCE: JSR PC ,REPCOOD 
3% 
5117 3@ COMMENTS: ERRNBR IS RESTORED TO ITS ENTERING VALUE BY THIS ROUTINE. 
sits 3% THIS ROUTINE REPORTS ERRORS WITH NUMBERS ERRNBR THRU ERRNBR+1. 
34 
Si 3@ SUBORDINATE ROUTINES CALLED: ER9001,SAVBMP. 
5121 B-- 8068660666068066600606666606666066660666666060606060666606060660060460480600640066 
$122 023762 REPCOD:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
023762 004567 161336 JSR RS, PREGOS sCALL REGISTER SAVE SUBRT. 
5123 023766 012767 014512 161326 MOV #ER9001 , ERRBLK SELECT THE ERROR REPORTING ROUTINE. 
5124 023774 016703 161316 MOV ERRNBR RS sPRESERVE THE ERROR NUMBER. 
5125 024000 010204 MOV R2,R4 sEXTRACT THE LINE NUMBER FIELD 
5126 024002 000304 S' RE s FROM THE ERROR CODE WHICH WAS 
ay 024004 042704 177760 BIC #177760 ,R4 s PASSED INTO THIS ROUTINE. 
3¢ 
aa 3; DETERMINE THE TYPE OF CODE WHICH IS TO BE REPORTED. 
i- 
5131 024010 012701 011236 MOV #EM9003 ,.R1 sSELECT MODEM STATUS CODE MESSAGE. 
5132 024014 032702 000001 BIT @#BITO,R2 sTEST THE a i STATUS INDICATION BIT. 
5133 024020 001422 BEQ 4S sGOTO IF MODEM STATUS CODE. 
5134 024022 161270 ERRNBR sSELECT Te SELFTEST CODE ERROR ‘ 
5135 024026 012701 011260 MOV #EM9004 ,R1 sSELECT SELFTEST CODE MESSAGE. 
5136 024032 012700 000300 MOV #300 ,RO sCHECK IF SELF-TEST OR BMP CODE. 
5137 024036 BIC R2,RO0 i TRY TO CLEAR BMP BITS. 
5138 024040 001003 BNE 2s 3GO CHECK FOR SELFTEST CODE IF NOT BMP. 
5139 024042 004767 000604 JSR PC, SAVBMP sSAVE THE BMP CODE ON THE QUEUE. 
5140 024046 000423 BR $ sEXIT THIS ROUTINE. 
5141 024050 122702 000201 2%: CMPB 3 #201,R2 sCHECK FOR SELF TEST NULL CODE. 
5142 024054 001416 BEQ sEXIT ROUTINE IF NULL FOUND. 
5143 024056 7 000203 #203 ,R2 i CHECK FOR SKIP SELF TEST CODE. 
5144 024062 001413 BEQ sEXIT ROUTINE IF SKIP SELF TEST CODE FOUND. 
5994 024064 BR 4% 3GO REPORT SELF TEST ERROR. 
s¢ 
ee s REPORT “UNEXPECTED XXXXxX CODE FOUND IN RECEIVE CHAR FIFO.” 
5149 024066 042702 177400 as: BIC #177400 ,R2 sREMOVE UPPER BYTE OF CODE TO BE REPORTED. 
5150 024072 004767 002154 JSR PC, TXROFF sTURN OFF TX AND RX DURING ERROR REPORTING. 
5151 024076 5 >>>>> ERROR <<ccc, 
024076 1 TRAP CSERROR 
atae 024100 012767 000001 156116 MOV #1,FERROR sINDICATE THAT AN ERROR HAS BEEN FOUND. 
5154 024106 004767 002200 JSR PC, TXRON sTURN TX AND RX BACK ON. 


fr A A 
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$155 
5156 
5157 
$158 024112 
$159 
5160 024116 


024116 
5161 024120 


010367 161200 


004736 
000207 
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3¢ 
s RESTORE THE INITIAL ERROR NUMBER. 


3 
6%: MOV R3,ERRNBR 
60$: PASS 
JSR 
RTS PC 


1iiaa 


sRESTORE GPRS. 
PC ,@(SP)-+ 





SEQ 136 


sRETURN TO PREGOS SUBRT. 


Hid 
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GLOBAL SUBROUTINE EPSMR 
5163 SBTTL GLOBAL SUBROUTINE - REPSMR - 
5164 3 OO SHRHSHAEAASASSALAEASOEREASASEEEEEEAACASEEEALEEESAECEEEEEHEEEOEEEEEEEEEESEEEEEEESD 
5165 4 - REPORT ERROR SUMMARY ROUTINE - 
5166 . THIS SUBROUTINE REPORTS AN ERROR SUMMARY FOR THOSE LINES WHICH HAVE 
5167 on EXCEEDED THE NUMBER OF INDIVIDUAL ERRORS TO REPORT FOR A SINGLE LINE 
5168 a IN A SINGLE TEST. THIS PARAMETER CAN BE SPECIFIED BY THE OPERATOR IF 
5169 ‘s HE/SHE ANSWERS THE SOFTWARE PARAMETER QUESTIONS. 
34 
5171 ;@ INPUTS: ERCNTB - LABEL AT BASE OF LINE ERROR COUNTERS TABLE. 
5172 4 ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE. 
5173 ‘3 ERRNBR - ERROR NUMBER OF ERRORS IN THIS ROUTINE. 
5174 :e ERSMRF - “REPORT ERROR SUMMARY FOR LINE” FLAGS. 
3% 
5176 ;* OUTPUTS: ERRBLK - ADDRESS OF ERROR REPORTING ROUTINE (DESTROYED). 
5177 :6 SUMMARY MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 
34 
5179 ;@ CALLING SEQUENCE: JSR _—- PC, REPSMR 
34 
5181 ;@ COMMENTS: | IF NO LINES HAVE EXCEEDED THE MAXIMUM NUMBER OF INDIVIDUAL 
5182 _ ERRORS TO REPORT, NO MESSAGES ARE PRINTED BY THIS ROUTINE. 
5183 é ERROR SUMMARIES IN THIS ROUTINE ARE REPORTED AS ERRORS. 
5184 a THE CONTENTS OF ERRBLK ARE DESTROYED. 
3% 
5186 ;@ SUBORDINATE ROUTINES CALLED: 
otf B--— SHSASSHSHEHSSASSSEKEEEEHESESEEAEESSEEASEEEEEEEEEEEEEEEEEEEEEEE4EEEEEEEEEEEEEEE 
5189 024122 REPSMR:: SAVE SAVE CONTENTS OF GPRS RO THRU RS. 
024122 004567 161176 JSR _—sR'5, PREGOS CALL REGISTER SAVE SUBRT. 
5190 024126 005767 156346 TST —_ ERSMRF iCHECK THE “PRINT LINE ERROR SUMMARY” FLAGS. 
5191 024132 001404 BEQ sé IEXIT WITHOUT ACTION IF NO SUMMARY FLAGS SET. 
3¢ 
5193 ; WE HAVE SOME ERROR SUMMARIES TO REPORT. 
t- 
5195 024134 012767 015162 161160 MOV - @ER9004,ERRBLK SELECT ERROR REPORTING ROUTINE. 
cd 
5197 } REPORT 
5198 i; "ERROR SUMMARY REPORT FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS: “ 
5200 024142 *” ERROR 
024142 104460 TRAP —CSERROR 
5202 024144 60$: PASS ;RESTORE GPRS. 
024144 004736 JSR —s- PC. BC SP)» ;RETURN TO PREGOS SUBRT. 
5203 024146 000207 RTS PC 


Ae pein Te eee oeees 


GLOBAL SUBROV’TINE 


Lit 
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5251 024210 


S257 024214 
S258 024216 
5259 024222 
5260 024226 


010277 
004767 


161150 
000040 


156014 


011610 
174764 


155770 
000504 


011610 
174740 


-SBTTL GLOBAL SUBROUTINE - RESETT - 
FPASRAAASEASEHAAASSSSEARARALASEEEEESEEAEEEEEEARERERELEAERASEEEEEEEEEEEEEEEEEEEEEEE 
3% - RESET DEVICE UNDER TEST - 

34 THIS SUBROUTINE IS USED TO RESET THE DUT TO A KNOWN STATE. 

34 IF RESET DOES NOT SUCCESFULLY COMPLETE, IE. TIME-OUT OCCURS, THEN 

74 AN ABORT TEST ERROR MESSAGE IS REPORTED. 

3% 

3* INPUTS: CSRA - CONTAINS THE ADDRESS OF THE CSR 

34 TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 
34 ERRTBL- ERRTYP,ERNBR,AND ERRMSG SET UP CORRECTLY. 

3% 

3 OUTPUTS: THE DUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 

3% CARRY - CLEAR INDICATES THE TEST IS TO BE ABORTED. 

34 ERRBLK - VALUE MAY BE DESTROYED. 

34 IESTAT - TX AND RX INTERRUPT FLAGS ARE CLEARED. 

34 TX AND RX INTERRUPT ENABLE BITS IN THE DUT'S CSR ARE CLEARED. 


a 
s# CALLING SEQUENCE: JSR PC ,RESETT 


* 
3 COMMENTS: THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS INITIAL ERRNBR 
34 THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 


3% 
3@ SUBORDINATE ROUTINES CALLED: DELAY,MSLGET. 
8 FSSSOSOSEOSEEEEEEEKEEEEEOE4OOOO66666666460606046666666668666066666666666666466664644% 


RESETT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS , PREGOS sCALL REGISTER SAVE SUBRT. 
MOV @BITOS.R2 sSET BIT MASK OF MASTER RESET BIT. 


3¢ 

s TEST THE STATE OF THE MASTER RESET BIT IN THE CSR. 

s IF MR IS SET THEN WAIT FOR SELF-TEST TO COMPLETE. 

s IF TIME-OUT OCCURS, REPORT THE ERROR AND PASS-OUT ABORT TEST INDICATOR. 
i- 


MOV CSRA,R4 sGET THE ADORESS OF THE DUT’S CSR. 

BIT R2,(R4) sCHECK STATE OF a RESET BIT. 

BEQ es sO0N'T DELAY IF MR IS ALREADY CLEAR. 

CLR R3 sSET UP DESIRED STATE OF MASTER RESET BIT. 
MOV #5000. ,R1 sPASS TIME-OUT VALUE OF 5S SECONDS. 

JSR PC, MSLGET sWAIT FOR SELF-TEST TO COMPLETE, MR CLEAR. 
Bcc ag sGO REPORT ERROF: IF TIMEOUT OCCURRED. 


; "SET MASTER RESET BIT IN CSR. CLEAR TX AND RX ENABLE BITS, ETC. 
s SKIP THE SELFTEST. 
s TIME-OUT OF S SECS, JUST IN CASE THE SELF-TEST EXECUTES. 


hed 
2s: MOV R2,8CSRA sSET MASTER RESET BIT, DISABLE TX AND RX INTS. 
JSR PC, SKPSTS sTRY TO SKIP THE SELFTEST. 


3 

s SET SELF-TEST TIME-OUT OF 5S SECONDS, AND WAIT FOR M.R TO CLEAR. 

s IF TIME-OUT OCCURS, THEN REPORT THE FATAL ERROR AND PASS-OUT THE ABORT 
s TEST INDICATOR. 


CLR R3 sSET UP DESIRED STATE OF MASTER RESET BIT. 
MOV #5000. ,R1 }PASS TIME-OUT VALUE OF S SECONDS. 
JSR PC,MSLGET sWAIT FOR SELF-TEST TO Bagi ha O MR CLEAR. 
BcsS 6% sSKIP ERROR REPORT IF MR CLEARED IN TIME. 


SEQ 138 
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104460 
000241 
000403 


155760 


161060 
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- RESETT - 


‘¢ 
: SET UP ERROR MESSAGE TO REPORT “FATAL ERROR FOUND DURING RESET,TEST ABORTED”. 
; INDICATE TEST IS TO BE ABORTED BY CLEARING THE CARRY BIT. 
ied 
4$: MOV 0€M1601,R1 sPASS ERROR MESSAGE TO REPORT. 
MOV #ER1603,ERRBLK ;PASS ADORESS OF ERROR HANDLING ROUTINE. 
sREPORT ERROR “TIME-OUT OCCURRED WAITING FOR MASTER RESET TO CLEAR” 


; “TEST ABORTED” 
ERROR 3 >>>>> ERROR <<<<< 


TRAP CSERROR 
CLC sINDICATE TEST IS TO BE ABORTED. 
BR 60% sEXIT THIS SUBROUTINE, ABORT TEST INDICATOR. 


3¢ 
; CLEAR TX AND RX INTERRUPT ENABLE STATUS FLAGS IN IESTAT. 
s EXIT WITH CONTINUE TEST INDICATOR SET CIE,CARRY SET). 


63: CLR IESTAT sCLEAR TX AND RX INTERRUPT STATUS FLAGS. 
SEC sINDICATE SUCCESS, CONTINUE TEST. 
60$: PASS sRESTORE GPRS, PASS THE FOLLOWING INTACT: 
JSR PC, @(SP)+ sRETURN TO PREGOS SUBRT. 
ats pc sCARRY BIT: IF CLEAR, INDICATES ABORT TEST. 


Kil 
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GLOBAL SUBROUTINE RXNDN - 
5284 -SBTTL GLOBAL SUBROUTINE - RRXNON - 
5285 BOF AHKHHAHEAAAAAASSASAAEAASAARELEARELESESLALEAEEEEREREREEEREAEAEARESEAEAEAEEEEADEERSE 
5286 3% - REPORT RECEPTION NOT COMPLETED ROUTINE - 
5287 3% THIS SUBROUTINE CHECKS FOR LINES WHICH DID NOT RECEIVE THE COMPLETE 
aoe 3% DATA PATTERN. IF ANY ARE FOUND, THEY ARE REPORTED. 
3% 
5290 3* INPUTS: RS - LOCAL ACTIVE LINES BIT MAP. 
5291 3% OPLENB - BASE OF TABLE OF DATA PATTERN LENGTHS. 
5292 34 ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE FOR THIS ROUTINE. 
5293 34 ERRNBR - ERROR NUMBER OF ERROR REPORTED IN THIS ROUTINE. 
5294 3% RXCNTB - LABEL AT BASE OF THE RX CHARACTER COUNTERS TABLE. 
see 3% RXDONF - RECEPTION DONE FLAGS. 
3% 
5297 3# OUTPUTS: ERRBLK - ADDRESS OF THE ERROR REPORTING ROUTINE (DESTROYED). 
aoe 3* MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 
3% 
coe 3# CALLING SEQUENCE: JSR PC ,RRXNON 
3% 
5302 3* COMMENTS: IF NO LINES FAILED TO COMPLETE THEIR RECEPTION, NO MESSAGES 
5303 34 ARE PRINTED. 
5304 34 
5305 3# SUBORDINATE ROUTINES CALLED: ER900S. 
5306 S-— SHHSEKHSHHSAAASACESEEEAAEEEEASEAEEEAESEAEEEEEEEEEDEKEGEEEESEEEEEEEEEESEEEEEE 
5307 
5308 024262 RRXNON:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
024262 004567 161036 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
5309 024266 010502 MOV RS,R2 GET COPY OF THE "LOCAL ACTIVE LINES BIT MAP. 
5310 024270 046702 156210 BIC RXDONF ,R2 iGET MAP OF AC. IVE LINES WITH RX DONE FLAG CLR. 
str 024274 001413 BEQ 60% sEXIT IF NO ACTIVE LINES HAVE RX DONE FLAG CLR. 
3¢ 
tr} 3 WE HAVE SOME "RX NOT COMPLETED” ERRORS TO REPORT. 
5315 024276 012767 015276 MOV @ER9005,ERRBLK ;SELECT THE ERROR REPORTING ROUTINE. 
5316 024304 012701 011724 MOV #€M9016,R1 sINDICATE THAT WE ARE DEALING WITH RECEPTION. 
tH 024310 012704 003542 MOV ORXCNTB ,R4 sPASS BASE OF RX CHAR COUNTERS TABLE TO ER900S. 
3° 
5319 3 REPORT “SINGLE CHARACTER MODE TEST ERROR: ” 
etsy Fy “DATA PATTERN NOT COMPLETELY RECEIVED ON ALL LINES:” 
5322 Se ine, 
5323 024314 ERROR 
024314 104460 TRAP CSERROR 
ta 024316 012767 000001 155700 MOV #1,FERROR sINDICATE AN ERROR HAS BEEN FOUND. 
5326 024324 60%: PASS sRESTORE GPRS. 
024324 004736 JSR PC, aC SP)+ sRETURN TO PREGOS SUBRT. 
5327 024326 000207 RTS PC 


Lil 
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GLOBAL SUBROUTINE TXNON - 
5329 -SBTTL GLOBAL SUBROUTINE - RTXNON - 
5330 BOF ARRAKHHHHAEAOAAALALEAEAAAAEAAASEEABEEASSESEEAALESEAREREEERERESELESEEAEEAEEEREEEES 
5331 :* - REPORT TRANSMISSION NOT COMPLETED ROUTINE - 
5332 3° THIS SUBROUTINE CHECKS FOR LINES WHICH DID NOT TRANSMIT THE COMPLETE 
ty 34 DATA PATTERN. IF ANY ARE FOUND, THEY ARE REPORTED. 
3* 
5335 3* INPUTS: RS - LOCAL ACTIVE LINES BIT MAP. : 
5336 :* OPLENS - LABEL AT BASE OF DATA PATTERN LENGTH TABLE. 
5337 34 ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE FOR THIS ROUTINE. 
5338 3% ERRNGR - ERROR NUMBER OF ERROR REPORTED IN THIS ROUTINE. 
5339 34 TXCNTB - LABEL AT BASE OF THE TX CHARACTER COUNTERS TABLE. 
soar 34 TXDONF - TRANSMISSION DONE FLAGS. 
3* 
5342 3* OUTPUTS: ERRBLK - ADDRESS OF THE ERROR REPORTING ROUTINE (DESTROYED). 
aeea 3* MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 
3% 
Seen 3# CALLING SEQUENCE: JSR PC ,.RTXNON 
3% 
5347 3* COMMENTS: IF NO LINES FAILED TO COMPLETE THEIR TRANSMISSION, NO MESSAGES 
5348 3% ARE PRINTED. 
5349 3* 
5350 3# SUBORDINATE ROUTINES CALLED: ER9005. 
5351 B--— SHHESSEKASHSAKESSSEASEESSEAEESEASAOALEEOEDEOEEEEE46046646646464666666666666606664646 
5352 
5353 024330 RTXNON:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
024330 004567 160770 JSR RS , PREGOS sCALL REGISTER SAVE SUBRT. 
5354 024334 010502 MOV RS ,R2 1GET COPY OF THE LOCAL ACTIVE LINES BIT MAP. 
S355 024336 046702 156140 BIC TXDONF ,R2 sGET MAP OF ACTIVE LINES WITH TX DONE FLAG CLR. 
aes 024342 001413 BEQ 60% ;EXIT IF NO ACTIVE LINES HAVE TX DONE FLAG CLR. 
3¢ 
ta 3 WE HAVE SOME “TX NOT COMPLETED” ERRORS TO REPORT. 
t- 
5360 024344 012767 015276 160750 MOV #ER900S,ERRBLK ;SELECT THE ERROR REPORTING ROUTINE. 
5361 024352 012701 011710 MOV #EM9015,.R1 sINDICATE WE ARE DEALING WITH TRANSMISSION. 
33 | 024356 012704 003502 MOV @TXCNTB,R4 sPASS BASE OF TX CHAR COUNTERS TO TABLE EROSOS. 
5364 
5365 ; REPORT “SINGLE CHARACTER MODE TEST ERROR: “ 
anes 3 “DATA PATTERN NOT COMPLETELY TRANSMITTED ON ALL LINES:” 
5368 ae, 
5369 024362 ERROR F >>>>> ERROR <<<<<, 
024362 104460 TRAP CSERROR 
a 024364 012767 000001 155632 MOV #1,FERROR sINDICATE THAT AN ERROR HAS BEEN FOUND. 
5372 024372 60%: PASS sRESTORE GPRS. 
024372 004736 JSR PC ,@CSP)-+ sRETURN TO PREGOS SUBRT. 


5373 024374 000207 RTS PC 





mn a 


Mii 
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GLOBAL SUBROUTINE RXDSBL 
5375 .SBTTL GLOBAL SUBROUTINE - RXDSBL - 
5376 Oe AHHAKARAREARAEASEEASEALELALAEARELEAERESARAREAREELAREEESEEAEEEESREALEREREEREAEEESE 
5377 34 DISABLE RECEIVERS - 
5378 3% THIS SUBROUTINE Is USED TO DISABLE RECEPTION ON SELECTED LINES By, 
ion 3% CLEARING THE ASSOCIATED RX_ENABLE BIT ON THE DUT. 
3* 
5381 3 INPUTS: RS - BIT'S SET CORRESPOND TO LINES ON WHICH TO CLEAR RX_ENABLE. 
5382 3% CSRA - CONTAINS THE ADDRESS OF THE DUT CSR. 
5383 34 IESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE CSR. 
5384 34 NUMLNS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
Soee 34 LNCTRA - CONTAINS THE ADDRESS OF THE LNCTRL REGISTER. 
3% 
5387 3# OUTPU.s: RS - BIT’'S SET INDICATE INITIAL STATES OF ALL RX_ENBLE BITS. 
5388 34 LNCTRA - THE STATE OF THE RX_ENBLE BIT MAY BE ALTERED. 
oat 34 THE CONTENTS OF THE IND_ADD_REG FIELD IN THE CSR ARE DESTROYED. 
3% 
5391 3# CALLING SEQUENCE: JSR PC ,RXDSBL 
5392 3% j 
5393 3 COMMENTS: 
5394 34 
5395 3# SUBORDINATE ROUTINES CALLED: NONE. 
5396 F--— SSHSSHHAHASASRHSSASASEAAAKEAASEEHEAKEOEEKEEEEOEEAEOEEOEEEEEEEEEEEEEESEEEESEESESD 
5397 
5398 024376 RXDSBL:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
024376 004567 160722 JSR RS,PREGOS sCALL REGISTER SAVE SUBRT. 
5399 024402 010500 MOV RS,RO sCOPY BIT MAP OF "LINES TO OISABLE RECEPTION. 
S400 024404 012701 000001 MOV @BITO,R1 } INITIALIZE THE SELECTED LINE BIT MASK. 
5401 024410 016702 155574 MOV LNCTRA,R2 3GET THE ADORESS OF THE LNCTRL REGISTER. 
S402 024414 012703 000020 MOV @NUMLNS ,RS 3GET MAXIMUM LINE NUMBER PLUS ONE. 
5403 024420 016704 155610 MOV IESTAT, R4 sGET THE STATES OF THE INT ENABLE BITS. 
5404 024424 005005 CLR RS 3LOG POSSIBLE RX DISABLED ON ALL LINES. 
5405 3¢ 
Seat ; SELECT EVERY LINE IN TURN, AND LOG THE STATE OF EACH RX_ENABLE BIT. 
| id 
5408 024426 010477 155546 2s: MOV R4,8CSRA sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
5409 024432 032712 000004 BIT oBIT2,CR2) sCHECK STATE OF RX_ENABLE BIT ON SELECTED LINE. 
5410 024436 001401 BEQ as ;SKIP NEXT INSTRUCTION IF RX -ENABLE CLEAR. 
tet 024440 050105 BIS R1,R5 sLOG RX ENABLE BIT SET FOR SELECTED LINE. 
3¢ 
5413 ; CLEAR RX_ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE RX DISABLE 
ote ; LINE BIT MAP, 
i- 
5416 024442 030100 4$: BIT R1,RO sCHECK STATE OF DISABLE LINE BIT MAP. 
5417 024444 001402 BEQ 6% sBRANCH IF THIS LINE TO REMAIN UNALTERED 
5418 024446 042712 000004 BIC BIT2,CR2) ;CLEAR RX_ENABLE BIT ON SELECTED LINE. 
5419 024452 005204 6%: INC R4 sPREPARE TO SELECT REGISTERS FOR NEXT LINE. 
5420 024454 006301 ASL R1 | SHIFT BIT MAP FOR NEXT LINE. 
5421 024456 005303 DEC R3 sDECREMENT LINE NUMBER. 
eens 024460 001362 BNE 2s sLOOP TO CHECK NEXT LINE. 
5424 024462 60%: PASS RS sRESTORE GPRS,EXCEPT 
024462 010566 000014 MOV RS.RSSLOTC SP ) sPUT RS IN STACK SLOT. 
024466 004736 JSR PC, aC SP )+ sRETURN TO PREGOS SUBRT. 
5425 sRS - PREVIOUS STATES OF ALL RX_ENABLE BITS. 
5426 024470 000207 RTS PC 


Nii 


DHU-11 FUNCTIONAL VERIFICATION i M1200 12-DEC-83 16:16 PAGE 94 SEQ 143 
GLOBAL SUBROUTINE XENBL 
5428 -SBTTL GLOBAL SUBROUTINE - RXENBL - 
5429 2+ RRAREKARARAASERERAREREEAAEERESELEEESEREAALARERAEAEAEEEREAEAEAEAAAEEAEAEAEERE 
5430 pa ENABLE RECEIVER - 
5431 3% THIS SUBROUTINE Is USED TO ENABLE RECEPTION ON SELECTED LINES BY 
at 3% SETTING THE ASSOCIATED RX.ENABLE BIT ON THE DUT. 
;* 
5434 3* INPUTS: RS - BIT'S SET CORRESPOND TO LINES ON WHICH TO SET RX.ENABLE. 
5435 3% CSRA - CONTAINS THE ADDRESS OF THE DUT CSR 
5436 3% IESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE CSR. 
5437 34 NUMLNS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
Sane 3% LNCTRA - CONTAINS THE ADDRESS OF THE LNCTRL REGISTER. 
3% 
5440 3* OUTPUTS: RS - BIT'S SET INDICATE PREVIOUSLY DISABLED LINES. 
5441 3% LNCTRA - THE STATE OF THE RX.ENABLE BIT MAY BE ALTERED. 
Seat 3% THE CONTENTS OF THE IND.ADD.REG FIELD IN THE CSR ARE DESTROYED. 
fe 
Bead 3* CALLING SEQUENCE: JSR PC ,RXENBL 
3* 
5446 3@ COMMENTS: 
5447 3% 
5448 3# SUBORDINATE ROUTINES CALLED: NONE. 
5449 F-- SFHRERSSASSASESESKSSAAASESEAARASLAASEASAAERAAASESARASESSEARESSESEKEEEEEEEEEEEESED 
5450 
5451 024472 RXENBL:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
024472 004567 160626 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
S452 024476 010500 MOV RS,RO :COPY BIT MAP OF LINES TO ENABLE. 
5453 024500 012701 000001 MOV #BITO,R1 sINITIALIZE THE SELECTED LINE BIT MASK. 
5454 024504 016702 155500 MOV LNCTRA,R2 ;GET THE ADORESS OF THE LNCTRL REGISTER. 
3455 024510 012703 000020 MOV @NUMLNS .R3 iGET MAXIMUM LINE NUMBER 
S456 024514 016704 155514 MOV IESTAT, R4 sGET THE STATES OF THE INT ENABLE BIT Ss. 
ooo 024520 CLR RS ;CLEAR RX.ENABLE BIT LOG OF DISABLED LINES. 
at 
5459 ; SELECT EVERY LINE IN TURN,AND LOG ANY RX.ENBLE BIT THAT IS CLEAR. 
5461 024522 010477 155452 2s: MOV R4,@8CSRA sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
5462 024526 032712 000004 BIT eeite, CR2) sCHECK STATE OF RX.ENABLE BIT ON SELECTED LINE. 
5463 024532 001001 BNE sSKIP NEXT INSTRUCTION IF RX.ENABLE SET 
red 024534 050105 BIS al. RS ;LOG RX ENABLE BIT CLEAR FOR SELECTED LINE. 
3¢ 
5466 s SET RX. and ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE RX ENABLE 
3467 + LINE BIT 
5469 024536 030100 4$: BIT R1,RO sCHECK STATE OF RX.ENABLE LINE BIT MAP. 
5470 024540 001402 BEQ 6% sBRANCH IF THIS LINE TO REMAIN UNALTERED. 
5471 024542 052712 000004 BIS eBIT2,CR2) sENABLE RECEPTIONON SELECTED LINE. 
5472 024 6%: INC Ra sPREPARE TO SELECT REGISTERS FOR NEXT LINE. 
5473 024550 006301 ASL R1 sSHIFT BIT MAP FOR NEXT LINE. 
5474 024552 005303 DEC R3 sOECREMENT LINE NUMBER. 
oh 024554 001362 BNE 2s sLOOP TO CHECK NEXT LINE. 
5477 024556 60%: PASS RS sRESTORE GPRS,EXCEPT 
024556 010566 000014 MOV RS,RSSLOTC(SP) sPUT RS IN STACK SLOT. 
024562 004736 JSR PC, @CSP)+ sRETURN TO PREGOS SUBRT. 
5478 iR5 - LINE BIT MAP CORRESPONDING TO THE 
5479 s PREVIOUS LINES THAT WERE DISABLED. 
5480 024564 000207 RTS PC 
! 


Bie 
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GLOBAL SUBROUTINE RXIEO | 
5482 .SBTTL GLOBAL SUBROUTINE - RXIEO - 
5483 BHF SHEASSHEHESESHHSHEHESEEASESESEEEASEEEEEEEEEEOAASCESEEEEESEEESEESEHESEEEEEEEEEEEEEES | 
5484 :e - RECEIVER INTERRUPT DISABLE 
5485 - THIS ROUTINE IS USED TO DISABLE RECEIVER INTERRUPTS IN THE DHU11. 
7 ‘ 
5487 ;@ INPUTS NONE . | 
5488 34 
5489 +@ OUTPUTS THE RX.INT.ENBL BIT IS CLEARED IN THE DUT CSR. 
5490 36 IESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 
5491 ;e ENABLE BITS. 
5492 3¢ i 
5493 3@ CALLING SEQUENCE: JSR PC,RXIEO 
34 
5495 :@ COMMENTS: | THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 
phe 36 THE DUT CSR ARE DESTROYED. 
3% 
5498 ;@ SUBORDINATE ROUTINES CALLED: NONE. | 
5499 BF -—-— SHHSHSSHSSSESHSSSEESEEEEESEEEEEEEASEESESESEASEEEESESSEHASEEEEESESESEEEEEEEEEDEEE 
5500 024566 010046 RXIEO:: MOV RO, -(SP) sSAVE CONTENTS OF RO ON THE STACK. 
5501 024570 GETPRI -(SP) ;SAVE PROCESSOR PRIORITY ON STACK. 
024570 104440 TRAP  CSGPRI 
024572 010046 MOV RO, -(SP) 
5502 024574 SETPRI @PRIO7 ;IGNORE ANY INTERRUPT THAT MAY BE GENERATED. 
024574 012700 000340 MOV @PRIO7 RO 
024600 104441 TRAP C$SPRI 
5503 024602 042767 137777 155424 BIC 0137777, IESTAT ;CLEAR RX.INT.ENBL BIT IN IESTAT. 
024610 016777 155420 155362 MOV IESTAT,@CSRA DISABLE RX INTERRUPTS. 
5505 024616 SETPRI (SP)+ ;ENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 
024616 012600 MOV (SP)+,RO 
024620 104441 TRAP  C$SPRI 
5506 024622 012600 MOV CSP)», RO ;RESTORE RO. | 
5507 024624 000207 RTS PC 
rs 
t 
| 
1 
re Pt 


se 
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GLOBAL SUBROUTINE RXIE1 | 
5509 -SBTTL GLOBAL SUBROUTINE - RXIE1 - 
5510 BOF SHASHSHEHESHEHHOAEEEEHEEEEEEEEEEEEEEBEEEEEAEEEEEEEESESEEEEEEEESEEEEEEEEDEESE 
5511 3¢ - RECEIVER INTERRUPT ENABLE | 
ete 34 THIS ROUTINE IS USED TO ENABLE RECEIVER INTERRUPTS IN THE DHU11. | 
3¢ 
5514 3@ INPUTS: NONE. | 
5515 3¢ 
5516 3 OUTPUTS: THE RX. INT.ENBL BIT IS SET IN THE DUT CSR. 
$517 34 IESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 
5518 3* ENABLE BITS. 
$519 3¢ 
ae 3@ CALLING SEQUENCE: JSR PC ,RXIE1 
34 
$522 3* COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 
Pert :* THE DUT CSR ARE DESTROYED. 
3¢ 
5525 3@ SUBORDINATE ROUTINES CALLED: NONE. 
5526 B-— SHHHSESSSHSSHASEESSACEHSESEEHEEESEEEEEEEESEEASASEESEESEEESEEEEEEESEEEEEEEEEEEEEE 
$527 
S528 024626 052767 000100 155400 RxXIE1:: BIS #BITO6, IESTAT sSET RX. INT.ENBL BIT IN IESTAT. 
5529 024634 042767 137677 155372 BIC #137677,IESTAT ;CLEAR ALL OTHER BITS, EXCEPT TX AND RX I.E. 
5530 024642 016777 155366 155330 MOV IESTAT,@CSRA sENABLE RX INTERRUPTS. 
5531 024650 000207 RTS PC 


V1 % 


S565 024710 
5566 


5567 024714 
024714 
S568 024716 


GLOBAL SUBROUTINE 


160446 
155626 
155372 
177400 


002712 


000004 
155574 


Die 
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-SBTTL GLOBAL SUBROUTINE - SAVBMP - 
$ OF SORSEEEEEEEEREEEEREDEEEEEEAEEAEEEESEEEEEEEDOEDEEEEEEDEEEEEEEEEDEEEDEDEDEEES 


i¢ - SAVE BMP CODES ROUTINE - 

34 THIS ROUTINE SAVES THE PARAMETER PASSED IN, ONTO THE BMP CODE QUEUE 
34 TOGETHER WITH THE NUMBER OF THE CURRENTLY EXECUTING TEST. 

* 

3@ INPUTS: Re - CONTAINS THE BMP CODE THAT IS TO BE PLACED ON THE QUEUE. 


BMPCQP - CONTAINS ADDRESS OF NEXT LOCATION IN THE BMP QUEUE. 
BMPCQB - LABEL AT BASE OF THE BMP CODE QUEUE. 
BMPCQE - LABEL OF NEXT LOCATION AFTER THE END Test THE BMP QUEUE. 


3¢ TSTNUM - CONTAINS THE NUMBER OF THE CURRENT T 

34 

s@ OUTPUTS: BMPCQP - INCREMENTED BY 4. 

:¢ THE CONTENTS OF THE BMP CODE QUEUE ARE UPDATED. 

3% 

s@ CALLING, SEQUENCE: JSR PC, SAVBMP 

34 

3@ COMMENTS: IF THE OVERFLOW OCCURS THEN THE LAST LOCATION WILL BE 

74 OVERWRITTEN BY ANY SUBSEQUENT ATTEMPTS TO UPDATE THE QUEUE. 
3% 


3 SUBORDINATE ROUTINES CALLED: NONE. 


B—— SHHSSHASEHSESSESESESOESEEASEHEEASHHASEEHESESEEESESEEEESEESEEAEEEEEEESEEEEEEEEEEEESE 


SAVBMP:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV BMPCP .R4 GET THE POINTER TO THE NEXT LOCATION IN QUEUE. 
MOVE | aaa C(R4)+ sSAVE THE CURRENT TEST NUMBER ON THE QUEUE. 
INC sINCREMENT THE POINTER TO GIVE AN EVEN ADORESS. 
BIC 9177400, R2 sCLEAR THE UNWANTED BITS FROM THE BMP CODE. 
MOV R2,(R4)> CODE ON THE QUEVE 


CMP R4, SBMPCQE sCHECK IF OVERFLOW WILL OCCUR THE NEXT TIME. 
BLO 2s sGO SAVE THE POINTER IF WE WILL NOT OVERFLOW. 
SUB @4,R4 sRESET THE A coll TO THE LAST “LOCATION IN QUE. 
2s: MOV R4 ,BMPCQP sSAVE THE POINTER 
60% PASS sRESTORE GPRS. 
ave ec JSR PC, @(SP)+ sRETURN TO PREGOS SUBRT. 


Ff a Ar 


SEQ 146 


5609 024772 
024772 
3610 024774 


GLOBAL SUBROUTINE 


004567 
012704 
004767 


012701 


012703 


155234 
000017 


E12 
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-SBTTL GLOBAL SUBROUTINE - SKPSTS - 
{OF SHAAEREAAEEEDEEERESEAEEEOEREEEEREREEEEEEOEEEDESEEEEEEESEEEOEEEEEEEEEEERESEEES 


:4 - SKIP SELFTEST ROUTINE - 

34 THIS SUBROUTINE IS USED TO SKIP THE SELFTEST AFTER A DUT RESET HAS BEEN 
34 INITIATED. IT MUST BE ENTERED IMMEDIATELY AFTER SETTING THE DUT MASTER 
+4 RESET ROUTINE OR AFTER THE EXECUTION OF A BUS RESET (BECAUSE OF TIMING 
i* CONSIDERATIONS). 

a 

3@ INPUTS CSRA - CONTAINS ADDRESS OF THE DUT CSR. 


3¢ TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 
is OUTPUTS: SKIP SELFTEST CODES ARE WRITTEN TO THE DUT REGISTERS. 

‘8 CALLING SEQUENCE: JSR PC,SKPSTS 

is COMMENTS: 

. SUBORDINATE ROUTINES CALLED: DELAY. 


B-- SHESASESESEESSEASHSEEESEASEEEESEEESEESEEEESEEHEAESESASESELEEESEEERESEEEEEEEEEED 


SKPSTS:: SAVE sSA‘'E CONTENTS OF GPRS RO THRU RS. 
JSR RS PREGOS sCALL REGISTER SAVE SUBRT. 
“OV #10. ,R4 7” .SS DELAY VALUE OF 10 MILLI-SECONDS. 
JSR PC DELAY “él.AY FOR 10 MILLI-SECONDS. 


3¢ 
s WRITE SKIP SELF-TEST CODE (S2° 25) TO ALL THE INDEXED DUT REGISTERS. 


| ed 
MOV @NUMLNS !BITOS.R1 sFORM IND.ADR.REG FIELD (PLUS M.R. BIT) WORD. 
sTHE ABOVE INCLUSION OF THE M.R. BIT IS NECESSARY BECAUSE OF THE 
s LACK OF A M.R. BIT WRITE LOCK-OUT ON THE DHU-11. 
MOV #52525 .R3 sINITIALISE THE SKIP SELF-TEST CODE. 

4t: DEC Ri sSELECT THE NEXT SET OF DEVICE REGISTERS. 
MOV CSRA,R4 sGET THE ADORESS OF THE CSR OF THE DUT. 
MOV R1,CR4)+ G 


R3,CR4)> ER. 
CmP R4, TXBFCA sCOMPARE POINTER WITH LAST REGISTER ADORESS. 
BLO 6% sLOOP IF NOT ALL REGS DONE IN THIS BANK 

BIT #17,R1 sTEST FOR IND.ADR.REG FIELD DECREMENTED TO 0. 
BNE 4% sLOOP UNTIL ALL REGISTERS CONTAIN THE CODE. 


sRESTORE GPRS. 
JSR PC, @(SP)> 
RTS PC 


fra 


sRETURN TO PREGOS SUBRT. 


SEQ 147 


Fie 
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GLOBAL SUBROUTINE SPLSUP 


004567 
010067 
010167 
005067 
005067 


-SBTTL GLOBAL SUBROUTINE - SPLSUP - 


FOF SHASAHKEREAEASASAAAERSEEESESEAEHEREEAEREEHEREEEESEEEEEEEEEAEAEEESEAEAEEEEEEEEEE 


3 INPUTS: 


3# OUTPUTS: 


- SPLIT SPEED TRANSMISSION/RECEPTION SET-UP - 


THIS ROUTINE IS USED TO INITIALISE BOTH THE DUT AND THE 
TRANSMISSION/RECEPTION CONTROL PARAMETERS TO THE CORRECT 
STATE, PRIOR TO SPLIT SPEED TRANSMISSION/RECEPTION. 


RO - TX,RX LPR CONTENTS FOR LINES IN GROUP II. 
Ri - TX,RX LPR CONTENTS FOR LINES IN GROUP I. 
R2 - START ADDRESS OF DATA PATTERN TO TRANSMIT. 


R3 - NUMBER OF TIME DATA PATTERN TO BE TX ON LINES IN LINGRP1. 
R4 - NUMBER OF TIME DATA PATTERN TO BE TX ON LINES IN LINGRP2. 


ACTLNS - CONTAINS A BIT MAP OF ALL CURRENTLY ACTIVE LINES. 
LGRP1M - CONTAINS THE BIT MAP OF LINE GROUP I LINES. 
LOPBCK - CONTAINS THE TYPE OF LOOPBACK MODE SELECTED. 

CBB - LABEL AT BASE OF TX/RX CONTROL BLOCK. 


THE CONTENTS OF THE CONTROL BLOCK ARE DESTROYED. 


THE INDIRECT ADDRESS FIELD OF THE DUT CSR MAY BE DESTROYED. 


THE DUT'S LPR‘S AND LNC’S MAY BE MODIFIED. 

THE FOLLOWING POINTERS AND COUNTERS ARE INITIALISED; 
CHCNT ,, CHRTOT ,OPEND ,DPLEN, EXCNT ,RXCNT .RXDONF ,RXPTR, TXCNT, 
TXDONF , TXPTR, TXRXL . 


3 CALLING SEQUENCE: JSR PC, SPLSUP 


a 
3@ COMMENTS: 


THIS ROUTINE SHOULD BE CALLED Mg OURING THE TESTING OF 
THE SPLIT SPEED CAPABILITIES OF THE DUT. 
= Mi — LINE GROUPS ARE TESTED ON TRANSMISSION AND 


EG, R1 - LPR CONTENTS FOR LINES IN LGRP2M,TX=*Y,RX*Z BAUD. 

R2 - LPR CONTENTS FOR LINES IN LGRP1M,TX=Z,RX=Y BAUD. 
R3 - REPEAT TX ON LINES IN LINE GROUP 1 = X TIMES. 
R4 - REPEAT TX ON LINES IN LINE GROUP 2 = W TIMES. 

JSR_ PC, SPLSUP 3s 00 SET-UP. 

EXECUTE TEST FOR THE ABOVE SET-UP. 

SWAP THE CONTENTS OF R1 AND Re. 

SWAP THE CONTENTS OF RS AND R4. 
Ri - LPR CONTENTS FOR LINES IN LGRP2M,TX=Z,RX=Y BAUD. 
R2 _ LPR CONTENTS FOR LINES IN LGRP1M,TX=Y,RX=Z BAUD. 


R4 - REPEAT TX ON LINES IN LINE GROUP 2 = X TIMES. 
JSR _PC,SPLSUP 300 SET UP AGAIN. 
EXECUTE TEST AGAIN. 


s@ SUBORDINATE ROUTINES CALLED: CONMAP,RXDSBL ,.RXENBL , TXRINI. 


$-— SHESSSSSSSHSSSESESHSESSHSHASASASSSHESSEHSHASSSSESESHHSSHSHKSSSEHSHESAESESEEEEEESA 


SPLSUP:: SAVE 


sSAVE CONTENTS OF THE GPR‘'S RO THRU RS. 


JSR RS, PREGOS sCALL REGISTER SAVE SUBRT. 
RO, 70% 1SAVE LPR PARAMETER FOR LINE GRP2. 
R1, 72% sSAVE LPR PARAMETER FOR LINE GRP1. 
TXDONF sCLEAR THE TX DONE FLAGS FOR ALL LINES. 
RXDONF ;CLEAR THE RX DONE FLAGS FOR ALL LINES. 


%¢ 
s SET UP THE TRANSMISSION/RECEPTION CONTROL BLOCK TO INITIALISE THE LINES 


Pa 


SEQ 148 


Gie 
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025140 


004767 


012701 
016702 


156074 
003124 
000004 
000020 
155120 


155160 
155112 


000632 


177777 
155016 


; IN GROUP II. 


R 

ACTLNS, CRO) 
LGRP1M,(RO)>+ 
LOPBCK,CRO)+ 


RO 
#2,(RO) 


sSET CONTENTS OF LPR PARAMS IN TX/RX C.BLK. 
sGET BASE ADDRESS OF CONTROL BLOCK. 

SLNCTRL PARAMETER, ENABLE RECEIVERS. 

sSTART ADDRESS OF DATA PATTERN. 

:DATA PATTERN LENGTH SET TO 16. 

sNUMBER OF DATA PATTNS TO TRANSMIT ON LINGRP2. 
s68IT MAP OF LINES TO INITIALISE. 

sCLEAR THE UNWANTED LINES FROM BIT MAP. 

sSET LOOPBACK MODE. 

sINCREMENT ADORESS TO ACCESS NEXT WORD. 

sSET OFFSET FOR EACH TRANSMISSION START TO 2. 


s¢ 
s INITIALISE THE DUT AND THE ASSOCIATED POINTERS AND COUNTERS, TO THE STATE 
s DICTATED BY THE CONTENTS OF THE TX/RX CONTROL BLOCK. 


5= 
JSR 


PC, TXRINI 


sINITIALISE DUT. 


3¢ 
s SET UP CONTROL BLOCK FOR LINES IN GROUP I. 


LOPBCK , CRO)+ 
RO 


#2,(RO) 


sGET START ADORESS OF CONTROL BLOCK. 
sSET LPR PARAMETER FOR LINES TO a DATA. 


SE. 
sCLEAR THE UNWANTED LINES FROM BIT MAP. 
ACK MODE. 


s INCREMENT ADDRESS TO ACCESS NEXT WORD. 
iSET OFFSET FOR EACH TRANSMISSION START TO 2. 


4 INITIALISE THE DUT AND THE ASSOCIATED POINTERS AND COUNTERS, TO THE STATE 
s DICTATED BY THE CONTENTS OF THE TX/RX CONTROL BLOCK. 


g° 
JSR 


PC, TXRINI 


sINITIALISE DuT. 


t¢ 
s SET-UP THE REQUIRED LPR PARAMETERS NEEDED FOR THE CORRECT RECEPTION OF DATA 


s ON ASSOCIATED IN-ACTIVE LINES. 


s¢ 
s INITIALISE LPR PARAMETERS FOR LINE GROUP 1. 
@MAPLNS ,R1 


155716 MOV 


ACTLNS ,R2 
Ri 

R2 

R1,R2 


LGRP2M,.R2 
R2,CBMAPA 


CBOPNA 
72¢,CBLPRA 


PC, TXRINI 


sSET UP BIT MAP CORRESPONDING ie ALL LINES. 
sGET THE ACTIVE (TX) LINE BIT MAP 

sGENERATE A BIT MAP OF NONE EXISTANT LINES. 
sGENERATE A BIT MAP OF INACTIVE LINES. 
sCLEAR ANY “NONE EXISTANT” INACTIVE LINES. 
SONLY PASS LGRP1 ASSOCIATED LINE BIT MAP. 
sSET UP BIT MAP IN CONTROL BLOCK. 

sCLEAR REPEAT TX COUNT IN CONTROL BLOCK. 
iSET- UP COMPLEMENTARY LPR PARM FOR LGRP2. 
sINITIALISE INACTIVE LINES IN LGRP2. 


t¢ 
s INITIALISE LPR PARAMETERS FOR LINE GROUP 2. 


4intte & 


SEQ 149 


H12 | 
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5725 t- 
5726 025210 016702 154756 MOV ACTLNS,R2 sGET THE ACTIVE (TX) LINE BIT MAP. 
$727 025214 005102 COM R2 sGENERATE A BIT MAP OF INACTIVE LINES. 
$728 025216 040102 BIC R1,R2 sCLEAR ANY NONE EXISTANT INACTIVE LINES. 
5729 025220 046702 155012 BIC LGRP1M,R2 sONLY PASS LGRP2 ASSOCIATED LINE BIT MAP. 
5730 025224 010267 155704 MOV R2,CBMAPA sSET-UP BIT MAP IN CONTROL BLOCK. 
5731 025230 016767 000036 155664 MOV 70% ,CBLPRA sSET-UP COMPLAMENTARY LPR PARAM FOR LGRP1. 
te 025236 004767 000534 JSR PC, TXRINI sINITIALISE INACTIVE LINES IN LGRP1. 

3° 
5734 ; DISABLE RECEIVERS ON ALL LINES TO ENSURE THAT ONLY THE RECEIVERS OF THE 
5735 ; ASSOCIATED ACTIVE (TX) LINES ARE ENABLED.(STAGGARED LOOPBACK) 
dt. 3: RE-ENABLE RECEPTION ON THE CORRECT ASSOCIATED LINES. 

3- 
5738 025242 012705 177777 MOV @MAPLNS ,RS sSET-UP BIT MAP FOR ALL LINES. 
dh 025246 004767 177124 JSR PC ,.RXOSBL sDISABLE RX ON ALL LINES. 

3¢ 
dang ; ENABLE RECEIVERS ON ASSOCIATED (RX) LINES. 

ge 
5743 025252 016705 154714 MOV ACTLNS RS sGET ACTIVE (TX) LINE BIT MAP. 
5744 025256 004767 172212 JSR PC .CONMAP sGENERATE AN ASSOCIATED (RX) LINE BIT MAP. 
de 025262 004767 177204 JSR PC ,.RXENBL sENABLE RECEIVERS ON ASSOCIATED LINES. 
$747 025266 608: PASS sRESTORE GRP'S. 

025266 004736 JSR PC, @CSP)+ sRETURN TO PREGOS SUBRT. 

5748 025270 000207 RTS PC 
5749 025272 000000 708: -WORD O sLOCAL STORAGE OF LPR PARAMETER LGRP2. 
5750 025274 000000 728: -WORD O sLOCAL STORAGE OF LPR PARAMETER LGRP1. 


Iie 
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GLOBAL SUBROUTINE STPSW - 
$7S2 -SBTTL GLOBAL SUBROUTINE - STPSW - 
5753 BOF SHAREKAAAEAAEEEAERAEEEEREESEEEEEEEEEEREEEAEEEAEEEEESEEEEAEEEEEEEEEEEEEES 
$754 i* - SET PROCESSOR STATUS WORD - 
Sise 34 THIS ROUTINE SETS THE PSW TO THE CONTENTS OF R1. 
28 
$757 3% INPUTS: Ri - CONTAINS THE NEW PSW SETTINGS 
5760 3% 
gies i¢ CALLING SEQUENCE: JSR PC,STPSW 
34 
5763 ia COMMENTS: USED IN THE DMA ADDRESS TEST TO SET THE PROCESSOR 
dae] 34 PRIORITY WITHOUT MAKING A CALL TO THE DRS. 
3% 
S766 34 SUBROUTINES CALLED: NONE . 
5767 I PPRSSEREAEEEESEEEESEESEEESEASEEEEEEEEESEEEEEEEOEEEEEEOEEE46606606666060640606068 
5768 
5769 025276 STPSW:: SAVE 
025276 004567 160022 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
S770 025302 010146 MOV R1, -CSP) sPUSH THE NEW PSW CONTENTS ONTO THE STACK 
S771 025304 012746 025312 MOV @ADOR, -( SP) sPUSH THE NEW PC VALUE ONTO THE STACK 
5772 025310 000002 RTI sLOAD THE NEW PC AND PSW 
$773 025312 ADDR: PASS 3 
025312 004736 JSR PC, @CSP)+ sRETURN TO PREGOS SUBRT. 
5774 025314 000207 RTS PC sRETURN 
$775 
5776 
5777 
5778 


5758 34 
5759 34 OUTPUTS: PSW - SET TO THE CONTENTS OF R1 


a + - e ——— a a ee ee ee ee ee a ee Sees 


J1le2 
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GLOBAL SUBROUTINE STPSW - 


016703 
016702 


040203 
005703 
001427 


016702 


160002 


154644 
155150 


154566 


-SBTTL GLOBAL SUBROUTINE - TXDONE - 

3 OF SAKHAREAAAASSASESARADAREEEEEAAEEEEEEAEEEREEAEARERAREEEEEEEEEEEEAEEEEAEAEEEESE 
+4 - TRANSMISSION DONE - 

34 THIS SUBROUTINE IS USED IN THE TRANSMISSION/RECEPTION TESTS TO ALLOW 
3% TIME FOR TRANSMISSION TO COMPLETE ON OUTSTANDING LINES. 

3% 

3* INPUTS: ACTLNS - CONTAINS BIT MAP OF ALL ACTIVE LINES. 

34 TXDONF - TX DONE FLAGS, SET FOR LINES THAT HAVE SENT ALL CHARS. 
3% CHCNT - TABLE CONTANING THE NUMBER OF CHARS TO BE Tx’D. 

3% 

3% 

:# OUTPUTS: TRANSMISSION INTERRUPTS ARE DISABLED. 

3% 

3@ CALLING SEQUENCE: JSR PC, TXDONE 

3% 

3* COMMENTS: 


3% 
3# SUBORDINATE ROUTINES CALLED: MSLOOP,MUL16U. 
Fr -— SHHHKSSSHKSHSAKSSSSSHAAEHKAAAKESSEAKSEASEAEEEKESEKEEEOEEEEEOEEEEEEEEEEEEEEEESD 


TXDONE:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS , PREGOS sCALL REGISTER SAVE SUBRT. 


3¢ 

s CHECK IF ALL ACTIVE LINES HAVE COMPLETED TRANSMISSION. 

s IF ANY HAVE NOT YET COMPLETED, DETERMINE THE TX CHAR COUNT FOR A 

s LINE THAT HAS OUTSTANDING CHARACTERS TO TRANSMIT. USING THIS VALUE, 

s CALCULATE THE TIME-OUT VALUE NEEDED AT THE CURRENTLY SELECTED BAUD RATE. 
t Ted 


MOV ACTLNS ,R3 sGET THE ACTIVE LINE BIT MAP 

MOV TXDONF ,R2 1GET THE BIT MAP OF LINES THAT HAVE COMPLETED. 
BIC R2,R3 sGENERATE A BIT MAP OF LINES THAT ARE STILL TX. 
TST R3 sCHECK IF ALL LINES HAVE COMPLETED TX. 
BEQ 6% 160 OISABLE TX INTERRUPTS IF ALL DONE. 


3¢ 

s FIND A LINE THAT HAS NOT COMPLETED TRANSMISSION. 

s OBTAIN THE EXPECTED CHARACTER COUNT FOR THAT LINE (WHICH IS THE SAME FOR 
s ALL OTHER LINES WITH OUTSTANDING Tx’'S). 

s CALCULATE TIME-OUT VALUE. 

g= 


CLR R4 sCLEAR LINE NUMBER COUNTER. 
MOV #1,R2 iSELECT BIT MAP FOR THE FIRST LINE. 
2s: BIT R2,R3 sSEE IF THIS LINE HAS COMPLETED. 
BNE a3 sBRANCH IF THIS LINE HAS NOT COMPLETED TX. 
ROL Re sSHIFT THE LINE BIT MAP FOR THE NEXT LINE. 
INC Ra sINCREMENT THE LINE eg | eats 
BR es 1LOOP TO CHECK THE NEXT 
4%: ASL R4 sLINE NUMBER X 2 TO OBTAIN O OFFSET INTO TABLE. 
MOV CHCNTB(R4),R1 iGET THE EXPECTED NUMBER OF CHARS TO BE TX'D. 
MOV RXTOUT ,R2 sGET THE CURRENT TIME-OUT VALUE FOR ONE CHAR. 
JSR PC ,MUL16U (NUMBER OF CHARS TO TX) X CTIME-OUT OF 1 CHAR) 
ASL Ri sMULTIPLY DELAY TIME BY 2 TO GIVE A SAFE VALUE. 


y 
; WAIT FOR ALL OUSTANDING TRANSMISSIONS TO COMPLETE OR TIME-OUT. 
s OISABLE ALL TRANSMISSION INTERRUPTS. 


i- 
MOV ACTLNS ,R2 sPASS A BIT MAP OF THE BITS TO TEST. 


ivy7a “~~ 


| 


SEQ 152 





Kile 
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GLOBAL SUBROUTINE - TXDONE - 

5836 025404 

5837 025406 012704 002502 MOV @TXDONF ,R4 sPASS THE ADDRESS OF THE WORD TO TEST. 

5838 025412 004767 173664 JSR PC ,MSLOOP sWAIT FOR TIME-OUT OF TX COMPLETION. 

ot 025416 004767 000270 6$: JSR PC, TXIEO sDOISABLE ALL TX INTERRUPTS. 

5841 025422 60$: PASS sRESTORE GPRS. 

025422 004736 JSR PC,@CSP)-+ sRETURN TO PREGOS SUBRT. 
5842 025424 000207 RTS PC 


010203 MOV R2,R3 sPASS THE EXPECTED STATE OF THE TXDONF. 


Lie 
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GLOBAL SUBROUTINE TXDONE 
5844 ‘ 
5845 -SBTTL GLOBAL SUBROUTINE - TXDSBL - 
5846 LF RAARAAARASAHEASESESASAREAAREASEAARESEAEAEESERADLESEREREAEREREEAEEEAREREEEEEEESE 
5847 34 - TRANSMITTER DISABLE - 
5848 34 THIS SUBROUTINE IS USED TO DISABLE TRANSMISSION ON SELECTED LINES BY, 
sess 34 CLEARING THE ASSOCIATED TX.ENABLE BIT ON THE DUT. 
3% 
5851 3* INPUTS: RS - BIT'S SET CORRESPOND TO LINES ON WHICH TO CLEAR TX.ENABLE. 
5852 3% CSRA - CONTAINS THE ADORESS OF THE DUT C 
5853 3% IESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE CSR. 
5854 34 NUMLNS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
Sone 3% TXAD2A - CONTAINS THE ADDRESS OF THE TBUFFAD2 REGISTER. 
3* 
5857 3# OUTPUTS: RS - BIT'S SET INDICATE THE INITIAL STATES OF ALL TX.ENBLE BITS. 
5858 3% TBUFFAD2 - THE STATE OF THE TX.ENBLE BIT MAY BE ALTERED. 
5859 3* THE CONTENTS OF THE IND.ADD.REG FIELD IN THE CSR ARE DESTROYED. 
5860 34 
58661 3@ CALLING SEQUENCE: JSR PC, TXDSBL 
5862 3* 
5863 3@ COMMENTS: 
5864 3* 
5865 3# SUBORDINATE ROUTINES CALLED: NONE. 
5866 B--— SHSSHHKKSAASEESESEAEAKEAEEEEEEEEEEEEEEEEOEEOEO4EO46464666666404664666646466666664 
5867 
5868 025426 TXDSBL:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
025426 004567 157672 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
5869 025432 010500 MOV RS,RO COPY BIT MAP OF "LINES TO OISABLE TRANSMISSION. 
5870 025434 012701 000001 MOV @BITO, R1 s INITIALIZE THE SELECTED LINE BIT MASK. 
5871 025440 016702 154550 MOV TXAD2A ,R2 3GET THE ADDRESS OF THE TBUFFAD2 REGISTER. 
S872 025444 005202 INC R2 3GET THE ADDRESS OF THE MSBYTE OF TBUFFAD2 REG. 
5873 025446 012703 000020 MOV @NUMLNS .RS ;GET MAXIMUM LINE NUMBER PLUS ONE. 
5874 025452 016704 154556 MOV IESTAT,.R4 sGET THE STATES OF THE INT ENABLE BITS. 
ad 025456 005005 CLR RS sLO0G POSSIBLE TX DISABLED ON ALL LINES. 
3¢ 
= 4d ; SELECT EVERY LINE IN TURN, AND LOG THE STATE OF EACH TX.ENABLE BIT. 
i 
S879 025460 010477 154514 2s: MOV R4,8CSRA sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
5880 025464 105712 TSTB (CR2) sCHECK STATE OF TX.ENABLE BIT ON SELECTED LINE. 
5881 025466 100001 BPL Ag sSKIP NEXT INSTRUCTION IF TX.ENABLE CLEAR. 
soot 025470 050105 BIS R1,R5 3LOG TX ENABLE BIT SET FOR SELECTED LINE. 
3¢ 
5884 s CLEAR TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE TX DISABLE 
5885 s LINE BIT MAP, 
5886 t- 
5887 025472 030100 4%: BIT R1,RO0 sCHECK STATE OF DISABLE LINE BIT MAP. 
5888 025474 001402 BEQ 6$ sBRANCH IF THIS LINE TO REMAIN UNALTERED. 
5889 025476 142712 000200 BICB #BIT7,CR2) ;CLEAR TX.ENABLE BIT ON SELECTED LINE. 
5890 025502 005204 6%: INC R4 sPREPARE TO SELECT REGISTERS FOR NEXT LINE. 
5891 025504 006301 ASL R1 sSHIFT BIT MAP FOR NEXT LINE. 
5892 025506 005303 DEC R3 sDECREMENT LINE NUMBER. 
ae 025510 001363 BNE et sLOOP TO CHECK NEXT LINE. 
5895 025512 60$: PASS RS sRESTORE GPRS,EXCEPT 
025512 010566 000014 MOV RS, RSSLOT( SP) sPUT RS IN STACK SLOT. 
025516 004736 JSR PC, @(SP)+ sRETURN TO PREGOS SUBRT. 


RS - PREVIOUS STATES OF ALL TX.ENABLE BITS. 


5896 
5897 025520 000207 





157576 


000001 
154454 


000020 
154462 


154420 


000014 
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GLOBAL SUBROUTINE XENBL 


.SBTTL GLOBAL SUBROUTINE 
SO REREEEEEEEAEAEEEREEEEEEEEEEEEEERAEEEEEEEAEEEEEEAEBAEEEEEEEREEESEEEEEEEEEEES 
- TRANSMITTER ENABLE - 
THIS SUBROUTINE IS USED TO ENABLE TRANSMISSION ON SELECTED LINES BY 


SETTING THE ASSOCIATED TX.ENABLE BIT ON THE DUT. 


3* INPUTS: 


3* OUTPUTS: 


* 
3 COMMENTS: 


RS - BIT'S 
CSRA - CONT 


- TXENBL - 


SEQ 155 


SET CORRESPOND TO LINES ON WHICH TO SET TX.ENABLE. 
THE DUT CSR. 


AINS THE ADDRESS OF 


IESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE CSR. 
NUMLNS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
TXAD2A - CONTAINS THE ADDRESS OF THE TBUFFAD2 REGISTER. 


RS - BIT'S SET INDICATE PREVIOUSLY DISABLED LINES. 
TBUFFAD2 - THE STATE OF THE TX.ENBLE BIT MAY BE ALTERED. 
THE CONTENTS OF THE IND.ADD.REG FIELD IN THE CSR ARE DESTROYED. 


3# CALLING SEQUENCE: JSR 


PC, TXENBL 


3% 
3* SUBORDINATE ROUTINES CALLED: NONE. 
F--— SPHHSSKSAALESESSEASESESEEEESASEEEESEEEEEEEAEEEEEESEEEEEEEEEOEO640046444644444644% 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS , PREGOS sCALL REGISTER SAVE SUBRT. 

;COPY BIT MAP OF LINES TO ENABLE. 

S INITIALIZE THE SELECTED LINE BIT MASK. 

sGET THE ADDRESS OF THE TBUFFAD2 REGISTER. 

sGET THE cae tio ye MSBYTE OF TBUFFAD2 REG. 


TXENBL:: SAVE 
JSR 
MOV RS,.RO 
MOV @BITO,R1 
MOV TXAD2A ,R2 
INC Re 
MOV @NUMLNS ,R3 
MOV IESTAT,R4 
. CLR R5 
3¢ ‘ 
; SELECT EVERY LINE IN TURN,AND 
t- 
2s: MOV R4,8CSRA 
TSTB (CR2) 
BMI 4$ 
BIS R1,R5 
3¢ 
3 
3: LINE BIT MAP 
ge 
4$ BIT R1,RO 
BEQ 6% 
BISB #BIT7,CR2) 
6%: INC RA 
ASL R1 
DEC R3 
BNE 2s 
60%: PASS RS 
MOV 
JSR 
RTS PC 


1GET MAXIMUM 


sGET THE STATES OF THE INT ENABLE BITS. 
sCLEAR TX.ENABLE BIT LOG OF DISABLED LINES. 


LOG ANY TX.ENBLE BIT THAT IS CLEAR. 


sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
sCHECK STATE OF TX.ENABLE BIT ON SELECTED LINE. 
sSKIP NEXT INSTRUCTION IF TX.ENABLE SET. 

sLOG TX ENABLE BIT CLEAR FOR SELECTED LINE. 


SET TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE TX ENABLE 


sCHECK STATE OF TX.ENABLE LINE BIT MAP. 


sBRANCH IF THIS LINE TO REMAIN UNALTERED. 
;ENABLE TRANSMISSION ON SELECTED /_INE. 

sPREPARE TO SELECT a oo FOR NEXT LINE. 
sSHIFT BIT MAP FOR NEXT LINE. 

sOECREMENT LINE NUNBER. 

;LOOP TO CHECK NEXT LINE. 

sRESTORE GPRS, EXCEPT 

RS, RSSLOTCSP) sPUT RS IN STACK SLOT. 
PC ,.@CSP)-+ sRETURN TO PREGOS SUBRT. 


RS - LINE BIT MAP CORRESPONDING TO THE 
s PREVIOUS LINES THAT WERE DISABLED. 


Nie 
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GLOBAL SUBROUTINE 


004567 157502 
016705 154344 
005104 
040405 


010104 
006304 
016403 003202 
016402 003342 


-SBTTL GLOBAL SUBROUTINE - TXFRPR - 

FOF RRAAKKARAAAAARASEAEAEAAREERAREAERERAEERERARAEDAREAEEEEREREEAERAREES EERE 
3% - TRANSMIT FRAMMING ERROR DATA ROUTINE - 

3% THIS ROUTINE IS USED TO INITIATE OMA MODE TRANSMISSION 

3% IN THE FRAMMING ERROR TEST. IT SENDS A SINGLE CHARACTER DMA BUFFER ON 
34 EACH ACTIVE LINE IN THE BIT MAP, TO CAUSE FUTURE TX INTERRUPTS WHICH 
3% WILL CONTINUE THE TRANSMISSION IF MORE THAN ONE BUFFER IS TO BE SENT. 
3* 

3* INPUTS: R4 - CONTAINS THE LINES ON — TX IS TO TAKE PLACE. 

3% ACTLNS - ACTIVE LINES BIT MAP 

34 BITTBL - LABEL OF TABLE OF WORDS EACH WITH A BIT SET. 

3% CSRA - CONTAINS THE ADDRESS OF THE DUT CSR 

3* DPENDB - BASE OF THE DATA PATTERN END TABLE CENTRY PER LINE). 
3% DPLENS - BASE OF THE DATA PATTERN LENGTH TABLE. 

3% IESTAT - PRESERVED STATES OF THE DUT INTERRUPT ENABLE SITS. 
34 NUMLNS - EQUATED TO NUMBER OF LINES ON A DUT 

3% TXCNTB - LABLE AT BASE OF THE TX CHARACTER COUNTER TABLE. 

3% TXPTRB - LABEL AT BASE OF THE TX DATA PATTERN POINTERS TABLE. 
3* 

3* OUTPUTS: CSR - DUT CSR IND.ADR.REG FIELD IS DESTROYED. 

3% TXCNTX - COUNTERS INCREMENTED FOR LINES ON WHICH CHARS SENT. 
3% TXINTF - TX INT FLAGS (BIT SET IF DMA.HO FOUND SET ON LINE). 


* 
3# CALLING SEQUENCE: JSR PC, TXFRPR 


& 

:* COMMENTS: THIS ROUTINE ASSUMES THAT AT LEAST ONE DATA PATTERN SHOULD BE 
.# TRANSMITTED ON EACH ACTIVE LINE. 

34 INTERRUPTS MUST BE DISABLED WHEN CALLING THIS ROUTINE. 


3% 
3# SUBORDINATE ROUTINES CALLED: DODMA. 
B-- SHEAEEESEEEEEEEEASEEESESAAEEEEESSESEESESESESSEEAESASEESEEAESAEEEEESESEEEEEEEEEE 


TXFRPR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV ACTLNS RS ;GET THE ACTIVE LINE BIT MAP. 
COM R4 sGET BIT MAP OF LINES THAT WILL RECEIVE DATA. 
BIC R4,RS sCLEAR LINES THAT WILL RX FROM TX LINE BIT MAP. 
3¢ 
; SET UP LOOP WHICH HANOLES ONE LINE PER ITERATION. 
g° 
CLR Ri sCLEAR THE LINE NUMBER COUNTER. 
t¢ 
s IF THE LINE IS INACTIVE SKIP TO SELECT THE NEXT LINE. 
t- 
2s: CLC sCLEAR BOOLEAN REGISTER. 
ROR RS sSHIFT BIT MAP OF LINES TO TX ON INTO BOOL.REG. 
BCC 6% sDON'T TX ON THIS LINE IF IT IS NOT ACTIVE. 


3¢ 

3; LINE IS ACTIVE. 

s INITIATE DMA ON THIS LINE. 

3 GET THE DATA PATTERN LENGTH FOR THIS LINE. 


t- 
MOV R1,R4 sCOPY LINE NUMBER. 
ASL R4 sCALCULATE WORD OFFSET FOR THIS LINE. 
MOV DPLENB(R4),R3 ;GET DATA PATTERN LENGTH FOR THIS LINE. 
MOV TXPTRBCR4),R2 ;PREPARE TO PASS DATA PATTERN ADR TO DODMA RTN. 


3¢ 
s WRITE DMA PARAMETERS TO THE DUT. 


OHU-11 FUNCTIONAL VERIFICATION 
GLOBAL SUBROUTINE 


025656 
025662 


025664 
025672 


025674 


025700 
025702 
025704 


025706 
025706 
025710 


004767 
103404 


056467 
000402 


172122 


002364 


003502 


MACRO M1200 12-DEC-83 16:16 PAGE 104-1 
- TXFRPR - 


154372 


JSR 
BCS 


Bis 


PC,DODMA 
4s 


sSKIP ERROR IF DODMA WAS SUCCESSFUL. 


3° 
s SET THE PROPER BIT OF THE TX INTERRUPT FLAGS TO INDICATE THE LINE ERROR. 


BIS 
BR 


— >, TXINTF 


s INDICATE 'THE ERROR. 
sSKIP UPDATING POINTERS AND COUNTERS. 


3¢ 
s UPDATE THE TX CHARACTER COUNT FOR THIS LINE. 


t- 
4s: ADD 


R3, TXCNTBCR4 ) 


sADD THE DATA PATTERN LENGTH TO TX CHAR COUNT. 


3° 
s INCREMENT LINE COUNTER,GOTO NEXT LINE IF NOT DONE. 


t - 
68: INC 
TST 
BNE 
60%: PASS 


RTS 


JSR 


s INCREMENT THE LINE —” 
sTEST THE TX LINE BIT MAP 
sLOOP TO SEND CHAR TO ANOTHER LINE IF NOT DONE. 


sRESTORE GPRS. 


PC,@(SP)-+ sRETURN TO PREGOS SUBRT. 


SEQ 157 


ee ES SS 


Cil3 
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GLOBAL SUBROUTINE TXIEO 

6032 -SBTTL GLOBAL SUBROUTINE - TXIEO - 

6033 zee nn ttn mies aetna ee 

6034 34 - TRANSMITTER INTERRUPT OISABLE 

oean 346 THIS ROUTINE IS USED TO DISABLE TRANSMITTER INTERRUPTS IN THE DHU11. 

34 

6037 3@ INPUTS: NONE , 

6038 34 

6039 3@ OUTPUTS: THE TX. INT.ENBL BIT IS CLEARED IN THE DUT CSR. 

6040 34 IESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

6041 34 ENABLE BITS. 

6042 3¢ 

ree 3@ CALLING SEQUENCE: JSR PC, TXIEO 

34 

6045 3¢@ COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 

soos 36 THE DUT CSR ARE DESTROYED. 
34 

6048 3@ SUBORDINATE ROUTINES CALLED: NONE. 

6049 B--— SOHHSHOSASSEHEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEKEEEEEEEEEEE 

6050 025712 010046 TXIEO:: MOV RO, -(SP) sSAVE CONTENTS OF RO ON THE STACK. 

6051 025714 GETPRI -(SP) sSAVE CURRENT PROCESSOR PRIORITY ON THE STACK. 
025714 104440 TRAP CSGPRI 
025716 010046 MOV RO, -C(SP) 

6052 025720 SETPRI IPRIO7 s IGNORE ANY INTERRUPTS THAT MAY BE GENERATED. 
025720 012700 000340 MOV @PRIO7,RO 
025724 104441 TRAP CS$SPRI 

6053 025726 042767 177677 154300 BIC @177677,IESTAT ;CLEAR TX.INT.ENSBL BIT IN IESTAT. 

6054 025734 016777 154274 154236 MOV IESTAT,SCSRA sOISABLE Tx INTERRUPTS. 

6055 025742 SETPRI (SP)+ sENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 
025742 012600 MOV (SP)+,RO 
025744 104441 TRAP CSSPRI 

6056 025746 012600 MOV (SP)+,RO sRESTORE RO. 

6057 025750 000207 RTS PC 


D13 
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GLOBAL SUBROUTINE TXIE1 
6059 -SBTTL GLOBAL SUBROUTINE - TXIE1 - 
6060 tee — een, ieee aoe eee 
' 6061 3¢ - TRANSMITTER INTERRUPT ENABLE 
ooee 34 THIS ROUTINE IS USED TO ENABLE TRANSMITTER INTERRUPTS IN THE OHU11. 
& 
6064 7. INPUTS: NONE . 
6065 34 
6066 3 OUTPUTS: THE TX.INT.ENBL BIT IS SET IN THE DUT CSR. 
6067 3* IESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 
6068 3* . ENABLE BITS. 
6069 34 
Sort 3# CALLING SEQUENCE: JSR PC, TXIE1 
34 
6072 3* COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 
cova 34 THE DUT CSR ARE DESTROYED. 
34 
6075 3 SUBORDINATE ROUTINES CALLED: NONE. 
6076 B-— SPHESEHSESEHSESSSASASESESEEESEEHSEEEEEEESEASLESESEEASESEEEEEEEEEEEEEEEEEEEEEEED 
6077 
6078 025752 052767 040000 154254 TXIE1:: BIS oBIT14,IESTAT sSET TX.INT.ENBL BIT IN IESTAT. 
6079 025760 042767 137677 154246 BIC #137677, IESTAT ;CLEAR ALL BITS EXCEPT TX RX I.E BITS. 
6080 025766 016777 154242 154204 MOV IESTAT,@CSRA —~ ;ENABLE TX INTERRUPTS. 
6081 025774 000207 RTS PC 


Eis 


DHU-11 FUNCTIONAL VERIFICATION ag M1200 12-DEC-83 16:16 PAGE 107 SEQ 160 
GLOBAL SUBROUTINE TXRINI 

6083 -SBTTL GLOBAL SUBROUTINE - TXRINI - 
6084 BHF SRERHHEHSESAHOAKESSEEAADESESEEASEAEAEEEEHAREAEEEREEESSESESEEEEEASEEEAEEEEEEEESE 
6085 3¢ - TRANSMIT ANO RECEIVE INITIALIZATION ROUTINE - 
6086 34 THIS SUBROUTINE PERFORMS THE INITIALIZATION OF THE VARIOUS POINTERS, 
6087 34 COUNTERS, AND FLAGS WHICH ARE USED DURING THE TRANSMISSION AND 
6088 ye RECEPTION PORTION OF A TEST. THIS INITIALIZATION IS PERFORMED ON | 
zee 3¢ THE SPECIFIED LINES ONLY, OTHER LINE VARIABLES REMAIN UNCHANGED. 

34 
6091 3@ INPUTS: CHCNTB - LABEL AT BASE OF LINE CHARACTER COUNT TABLE. 
6092 34 CHRTOT - MAX @ OF CHARS TO RX ON LINES Ai READY INITIALIZED. 
6093 3% OPENOB - LABEL AT BASE OF LINE DATA PATTIE IN END TABLE 
6094 34 OPLENS - LABEL AT BASE OF LINE DATA PATTERN LENGTH TABLE. 
6095 34 EXCNTB - LABEL AT BASE ADDRESS OF EXTRA LHAR COUNTERS TABLE. 
6096 34 IESTAT - PRESENT STATE OF THE RX.IE AND TX.IE BITS. 
6097 34 NUMLNS - EQUATED TO NUMBER OF LINES ON THE DUT. 
6098 34 RXCNTB - LABEL AT BASE ADDRESS OF RX CHARACTER COUNTERS TABLE. 
6099 34 RXPTRB - LABLE AT BASE ADR OF “NEXT RX CHAR” POINTERS TABLE. 
6100 34 TXCNTB - LABEL AT BASE ADDRESS OF TX CHARACTER COUNTERS TABLE. 
6101 1% TXPTRB - LABEL AT BASE ADR OF “NEXT TX CHAR” POINTERS TABLE. 
6102 3% CBB - LABEL AT BASE OF TX/RX CONTROL BLOCK. 
6103 34 CB CONTENTS - TX/RX CONTROL BLOCK CONTAINS THE FOLLOWING: 
6104 34 CBLPRA - DUT LPF CONTENTS. 
6105 34 CBLNCA - DUT LNCGTRL CONTENTS. 
6106 3% CBOPAA - ADORESS OF BEGINNING OF DATA PATTERN. 
6107 34 CBOPLA - LENGTH IN BYTES OF DATA PATTERN. 
6108 34 CBOPNA - NUMBER OF DATA PATTERNS TO TRANSMIT. 
6109 34 CBMAPA - BIT MAP OF LINES TO BE INITIALIZED. 
6110 34 CBLPBA - TYPE OF LOOPBACK TO BE USED FOR TEST. 
6111 34 CBOFSA - AMOUNT TO OFFSET EACH TX START IN THE DATA PAT. 
tt 36 TXRXLB - LABEL AT BASE OF TX/RX LINE ASSOCIATION TABLE. 

34% 
6114 3@ OUTPUTS: CHCNT - TABLE OF NUMBER OF LINE TX CHARACTERS CINIfIALIZED). 
6115 34 CHRTOT - MAXIMUM NUMBER OF CHARS TO RECEIVE (2 « PAT LENGTH). 
6116 36 OPEND - TABLE OF DATA PATTERN ENDS (INITIALIZED). 
6117 34 OPLEN - TABLE OF DATA PATTERN LENGTHS CINITIALIZED). 
6118 36 OUT LNCTRL - LINE CONTROL REGISTERS CINIT ‘ 
6119 3@ LPR - LINE PARAMETER REGISTERS CINITIALIZED). 

36 EXCNT - TABLE OF EXTRA RX CHAR CLRED, SELECTED LINES). 
6121 34 RXCNT - TABLE RX CHARACTER COUNTS (CLRED, 
6122 3¢ a ~ TION DONE” FOR SELECTED LINES). 
6123 3¢ RXPTR - TABLE OF RECEIVE POINTERS CINITIALIZED). 
6124 36 TXCNT - TABLE OF TX CHARACTER COUNTERS (CLRED, SELECTED LINES). 
6125 34 TXDONF - “TRANSMISSION DONE” FLAGS (CLRED FOR SELECTED LINE"). 
6126 36 TXPTR - TABLE OF TRANSMIT POINTERS CINITIALIZED). 
ry 3¢ TXRXL - TX/RX LINE ASSOCIATION TABLE CINITIALIZED). 

3% 
ay s* CALLING SEQUENCE: JSR PC, TXRINI 

36 
6131 3@ COMMENTS: IF THE CALCULATION OF THE rye VALUE (2 TIMES THE DATA 
6132 36 PATTERN LENGTH) RESULTS IN A NUMBER GREATER THAN 64K THEN 
6133 34 CHRTOT IS INITIALIZED TO 64K - 1. 
6134 3% THIS gt = fl WILL NOT FORCE INTERNAL LOOPBACK BASED ON THE 
6135 46 LOOPBACK TYPE IN CBLPBA. THE USER MUST SET UP CBLNCA CORRECTLY 
ors 3¢ TO GET INTERNAL LOOPBACK. 

3¢ 
6138 s@ SUBORDINATE ROUTINES CALLED: WTWLNC,WTWLPR, 
6139 8-7 - £6666666 6646664666 6660666666566 6666660660 066668060666666060666566406068000464660408 





rf a 3 


GLOBAL SUBROUTINE 


F13 


OHU-11 FUNCTIONAL VERIFICATION . tao 12-DEC-83 16:16 PAGE 107-1 


6140 025776 


025776 004567 157322 


6180 026134 


6190 026156 


6195 026176 


155044 


154352 


177777 154342 


154770 
003142 


003202 


003502 


003342 


154752 000002 


005274 
005234 


TXRINI:: 


2s: 


4$; 


3- 
MOV 


108: 


SAVE 


JSR RS ,PREGOS 
3¢ 
s SET UP THE LPR AND LNCTRL REGISTERS AS SPECIFIED IN THE TX/RX CONTROL BLOCK. 


CBMAPA,RS 
CBLNCA,RO 
CBLPBA, #1 


PC, TXENBL 


sSAVE CONTENTS OF GPRS RO THRU RS. 
sCALL REGISTER SAVE SUBRT. 


sGET THE BIT MAP OF SELECTED LINES. 
sGET THE NEW LNCTRL CONTENTS. 


sCHECK IF INTERNAL LOOPBACK HAS BEEN SELECTED. 


SEQ 161 


sSKIP SETTING INT. LOPBCK IN MAINTENANCE FIELD. 


sSET INTERNAL LOOPBACK IN MAINTENANCE FIELD. 
sSET UP THE LNCTRL REGS FOR SELECTED LINES. 
sGET THE NEW LPR CONTENTS. 

sSET UP THE LPR REGISTERS FOR SELECTED LINES. 


sENABLE TX FOR ALL SELECTED LINES. 


BEGIN LOOP WHICH HANOLES ONE LINE PER ITERATION. 


R4 
CBDPAA,RS 
ye a R3 


R5.R c 
BrTTBL CRA), >, CBMAPA 


sCLEAR THE LINE OFFSET. 


sINITIALIZE THE TX START ADDRESS VALUE. 


sCHECK IF THIS LINE IS SELECTED FOR INIT. 
sSKIP SET UP IF LINE IS NOT SELECTED. 


4 THIS LINE IS a Mh ay ~ INITIALIZATION. 
SET UP PROPER ENTRY IN NUMBER 


OF CHARS TO TX AND RX 


CBOPLA,R1 sGET THE LENGTH OF THIS LINE'S DATA PATTERN. 
CBDPNA ,R2 sGET: THE NUMBER OF PATTERNS TO TX AND RX. 
PC ,MUL16U sCALCULATE THE TOTAL NUMBER OF CHARS TO TX/RX. 
R1,CHCNTBC(R4)  ;SET UP THE NUMBER OF TX/RX CHARS FOR LINE. 
R1,CHRTOT sADO TWICE THE NUMBER OF CHARACTERS TO TX/PX 
6% s ON THIS LINE TO THE TOTAL NUMBER OF CHARS 
_ i rg te A, WILL ALLOW TO BE RECEIVED ON 

‘ 
@-1,CHRTOT s SET MAX CHAR TOTAL TO -1 IF OVERFLOW. 

THE DATA PATTERN END AND LENGTH FOR THIS LINE. 

CBOPLA,OPLENB(R4) ;SET UP TX DATA PATTERN LENGTH FOR THIS LINE. 
R3,OPENDB(R4) ;SET UP TX DATA PAT END ADDRESS FOR THIS LINE. 

THE TX COUNTER AND CHARACTER POINTER FOR THIS LINE. 

TXCNTBCR4 ) sCLEAR *HE TX COUNTER FOR THIS LINE. 
RS,TXPTRBCR4) ;SET UP THE TX CHAR POINTER FOR THIS LINE. 

TME TX/RX LINE ASSOCIATION OFFSET TABLE ENTRY FOR THIS LINE. 
R4,R2 sSELECT LINE OFFSET FOR NON-STAGGERED LPBK. 
CBLPBA, #2 STEST FOR STAGGERED LOOPBACK. 

10% sSKIP SETTING STAGGERED LPBK IF NOT. 


R2 
STGTRBC(R2),R2 
R2, TXRXLBCR4) 


sFORM BYTE OFFSET INTO TABLE FROM TX LINE @. 
iGET THE RX LINE CORRESPONDING WITH TX LINE. 
sLOAD TX TABLE ENTRY WITH RX LINE OFFSET. 


TABLE. 
s INCLUDE CHAR COUNT ON THIS LINE IN MAX ALLOWABLE CHAR TOTAL FOR ALL LINES. 


GLOBAL SUBROUTI 


004736 
000207 


G13 
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t¢ 

s SET UP THE RX COUNTERS AND CHARACTER POINTER FOR THE RX LINE WHICH 
° IS ASSOCIATED WITH THIS TX LINE. 

t- 


sCLEAR THE RX COUNTER FOR THIS RX LINE. 
sCLEAR THE EXTRA CHAR COUNTER FOR THIS RX LINE. 
sSET UP THE RX CHAR POINTER FOR THIS RX LINE. 


; * UPDATE THE TX START POINTER IN PREPARATION FOR THE NEXT LINE. 


sADD THE TX OFFSET TO THE TX START POINTER. 
sCOMPARE TX START WITH END OF DATA PATTERN. 
sSKIP WRAPAROUND IF START IS BEFORE PAT END. 
sSUBTRACT DATA PATTERN LENGTH FROM START. 
sLOOP UNTIL START IS WITHIN DATA PATTERN. 


; * UPDATE THE TX LINE NUMBER OFFSET TO THE NEXT LINE. 


se 
s TEST FOR DONE HANDLING ALL POSSIBLE LINES ON THE DEVICE. 


003542 CLR RXCNTBC(R2) 
003242 CLR EXCNTB(R2) 
003402 MOV RS ,RXPTRBCR2) 
3 a 
154716 12$: ADO CBOFSA,RS 
14%: CMP os ; R3 
BLO 
154676 SUB COPA, RS 
BR 
3 - 
168: INC R4 
INC R4 
3 = 
000040 CMP a” @NUMLNS*2 
BLT 
60%: PASS 
JSR 
RTS PC 


sCOMPARE OFFSET WITH 2 TIMES MAX @ OF LINES. 
sLOOP IF NOT ALL LINES DONE. 


sRESTORE GPRS. 


PC, QC SP )+ sRETURN TO PREGOS SUBRT. 


SEQ 162 


ane 
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GLOBAL SUBROUTINE 


157046 


153764 
000300 
177777 


177124 
153744 


-SBTTL GLOBAL SUBROUTINE - TXROFF - 
FOF SBAREEESEROEEEESEEEEEEEEEAEEREEEEORORERESODEOEEDREDEEEEEEEEEEEDEEEEEEES SEEDED 


i* - TURN TX AND RX OFF ROUTINE - 

34 THIS SUBROUTINE IS USED TO TURN OFF DUT TRANSMISSION AND RECEPTION. 
34 THIS ROUTINE ACHIEVES THIS BY BOOSTING PROCESSOR PRIORITY TO 5 TO 
34 AVOID RX INTERRUPTS AND BY CLEARING ALL THE DUT TX.ENABLE BITS TO 
34 HALT TX CEITHER DMA OR SINGLE CHARACTER TX). THE STATES OF THE 

34 TX.ENABLE BITS AND THE PROCESSOR PRIORITY ARE SAVED FOR RESTORATION 
34 WHEN TX AND RX ARE RE-ENABLED. 


3% 
s@ INPUTS: MAPLNS - BIT MAP OF ALL POSSIBLE LINES ON THE DUT. 


3% 
s# OUTPUTS: SAVPRI - oe A PROCESSOR PRIORITY 
+4 SAVTEN - BIT MAP OF TX.ENBL BITS (BIT SETIF TX.ENBL WAS SET). 


34 

s# CALLING SEQUENCE: JSR PC, TXROFF 
34 

3* COMMENTS: 

34 

s@ SUBORDINATE ROUTINES CALLED: TXDSBL. 


B-- SHESASSHSSASEHASEASESEESAASEOASEEEEEASEEESEEEESEEESEHAAEAEEEEEEEEEEEESEEEEEEEED 


TXROFF:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
GETPRI SAVPRI 1GET THE PRESENT PROCESSOR PRIORITY. 
TRAP CSGPRI 
MOV RO, SAVPRI 
SETPRI @PRIO6 sOISABLE DUT INTERRUPTS. 
MOV @PRIO6 .RO 
TRAP Cs#SPRI 
MOV @MAPLNS ,RS sPREPARE TO DISABLE TX ON ALL DUT LINES. 
JSR PC, TxD sCLEAR ALL DUT TX.ENABLE BITS. 
MOV RS, SAVTEN sPRESERVE THE PREVIOUS TX.ENABLE BIT STATES. 
60$: PASS sRESTORE GPRS. 
ars pe JSR PC, @CSP)+ sRETURN TO PREGOS SUBRT. 


I13 
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7S 
6276 026312 
026312 
6277 026316 
6278 026322 
6279 026326 
026326 
026332 
6280 026334 
026334 
6281 026336 


004567 
016705 
004767 


016700 
104441 


004736 
000207 


157006 
153730 
177174 


153716 


a ee = ee —— eae ee ee ee ee ee - e- 


-SBTTL GLOBAL SUBROUTINE - TXRON - 

see rene ~~" ~~ ¥ “4-1; ween 
7) TURN TX AND RX ON ROUTINE - 

34 THIS SUBROUTINE Is USED TO TURN ON DUT TRANSMISSION AND RECEPTION. 

34 THIS ROUTINE RESTORES THE DUT TX.ENABLE BITS AND THE PROCESSOR PRIORITY 
7% TO THE STATES SAVED BY THE TXROFF ROUTINE. 


* 
3* INPUTS: SAVPRI - SAVED PROCESSOR PRIORITY 
14 SAVTEN - BIT MAP OF TX.EN@L BITS (BIT SETIF TX.ENBL WAS SET). 


* 
s# OUTPUTS: DUT TX.ENABLE BITS - SET TO SPECIFIED STATES. 
he PROCESSOR PRIORITY - SET TO SPECIFIED PRIORITY. 


e 

:@ CALLING SEQUENCE: JSR PC, TXRON 
* 

3* COMMENTS: 


3% 
3 SUBORDINATE ROUTINES CALLED: TXENBL. 
B--— SHHHSHSASHSHSSSEALAEESEESSEEESEHEAEEASESEASSEEESEEEEEEEKEEEEEEEE4EEEEEEEEEEEED 


TXRON:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS , PREGOS sCALL REGISTER SAVE SUBRT. 
MOV SAVTEN,RS 1GET THE SAVED STATES OF THE TX.ENABLE BITS. 
JSR PC, TXENBL sSET THE SPECIFIED TX.ENABLE BITS. 
SETPRI SAVPRI sRESTORE THE PROCESSOR PRIORITY. 
MOV SAVPRI ,RO 


TRAP C#SPRI 
608%: PASS sRESTORE GPRS. 
ats - JSR PC, @CSP)+ sRETURN TO PREGOS SUBRT. 


SEQ 164 


——/ 
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GLOBAL SUBROUTINE TXRREP 

6283 -SBTTL GLOBAL SUBROUTINE - TXRREP - 
6284 BO+ SERERASRAHESARSELEAERAAEEASEREEALERASCEEAEAREREASEEESEAEEEEEEAEASESAEESEEEEEEESD 
6285 3% - REPORT FINAL TX/RX ERRORS ROUTINE - 
6286 3% THIS SUBROUTINE REPORTS ERRORS WHICH ARE FOUND AFTER THE COMPLETION 
6287 34 OF THE X, RX, AND VERIFICATION OF DATA PATTERNS. IT REPORTS ERRORS 
<see 3% DEALING WITH INCOMPLETE TX OR RX AND WITH DMA_START BITS. 

3% 
6290 3# INPUTS: ACTLNS - BIT MAP OF ACTIVE DUT LINES. 
6291 3* OPLENS - LABEL AT BASE OF THE DATA PATTERN LENGTHS TABLE. 
6292 3% ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE FOR THIS ROUTINE. 
6293 34 ERRNBR - ERROR NUMBER OF ERROR REPORTED IN THIS ROUTINE. 
6294 3% RXCNTB - LABEL AT BASE OF THE RX CHARACTER COUNTERS TABLE. 
6295 34 RXDONF - RECEPTION DONE FLAGS. 
6296 3% TXCNTB - LABEL AT BASE OF THE TX CHARACTER COUNTERS TABLE. 
6297 34 TXDONF - TRANSMISSION DONE FLAGS. 
6298 34 TXINTF - CONTAINS BIT MAP OF LINES WITH DMA_START BIT ERRORS. 
6299 3% 
6300 3# OUTPUTS: CARRY FLAG - RESTORED TO ITS ENTERING VALUE. 
6301 3% ERRBLK - ADDRESS OF THE ERROR REPORTING ROUTINE Dreniatieeniaeener 
coon 3* MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE 

3* 
raed 3# CALLING SEQUENCE: JSR PC, TXRREP 

3% 
6306 3* COMMENTS: THIS ROUTINE REPORTS ERRORS AT INITIAL ERRNBR THRU 
6307 34 INITIAL ERRMBR+2. 
6308 34 IF NO LINES FAILED TO COMPLETE THEIR RECEPTION OR FAILED TO 
6309 3% COMPLETE THEIR TRANSMISSION OR HAD DMA_START BIT ERRORS 
ttf 36 THEN NO MESSAGES ARE PRINTED. 

34 
6312 3@ SUBORDINATE ROUTINES CALLED: CONMAP ,ER9005,ER9102,RDMAST,RRXNDN,RTXNON. 
eaaa B--— SHHESEHSSASHSESSASHSSESESESESEAESESEAEEESAESHSEASSESKEEEEEEEEEEEEEEEEEEEEEEEEER 

4 

6315 026340 TXRREP:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

026340 004567 156760 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
6316 026344 006003 ROR R3 sROTATE CARRY INTO GPR TO SAVE CARRY STATE. 
6317 026346 016704 156744 MOV ERRNBR ,R4 sSAVE THE INITIAL ERROR NUMBER VALUE. 

6316 026352 016705 153614 MOV ACTLNS RS sGET THE ACTIVE LINES BIT MAP. 

oo. 026356 004767 175340 JSR PC ,.RDOMAST sREPORT ANY DMA_START BIT ERRORS. 

6321 026362 032767 000100 153572 BIT @BIT06 OPTION sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
6322 026370 001003 BNE 2s sYES, THEN BRANCH. 

6323 026372 005767 153626 TST FERROR sHAS AN ERROR BEEN DETECTED ? 

rad 026376 001024 BNE 60% ;BRANCH AND EXIT IF IT HAS. 

6326 026400 005267 156712 2s: INC ERRNBR sSELECT INTIAL ERROR NUMBER + 1. 

rot 026404 004767 175720 JSR PC ,.RTXNON sREPORT TX NOT COMPLETE IF NECESSARY. 

6329 026410 032767 000100 153544 BIT #6 ITO6 OPTION sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
6330 026416 001003 BNE 4s a THEN BRANCH. 

6331 026420 005767 153600 TST FERROR HAS AN ERROR BEEN DETECTED ? 

ooo. 026424 001011 BNE 60% ; BRANCH AND EXIT IF IT HAS. 

6334 026426 005267 156664 4%: INC ERRNBSR sSELECT INITIAL ERROR NUMBER + 2. 

6335 026432 004767 171036 JSR PC, CONMAP sGENERATE AN ASSOCIATED LINE BIT MAP. 

6336 026436 004767 175620 JSR PC ,RRXNON sREPORT RX NOT COMPLETE IF NECESSARY. 

6337 026442 010467 156650 MOV R4,ERRNBR sRESTORE THE INITIAL ERROR NUMBER VALUE. 
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6339 026446 006103 

6340 026450 60$: 


026450 004736 
6341 026452 000207 


DEC-83 16:16 
ROL R3 

PASS 

RTS Pe 
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JSR 


sROTATE SAVED CARRY STATE BACK INTO CARRY. 
sRESTORE GPRS, THIS ROUTINE PRESERVES THE 


PC,@C(SP)-+ 
s INITIAL CARRY STATE. 


SEQ 166 


sRETURN TO PREGOS SUBRT. 


Lis 
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GLOBAL SUBROUTINE UNSDIV 
6343 -SBTTL GLOBAL SUBROUTINE - UNSDIV - 
6344 2+ MHKAARARAAAAEEREAEEAAEKSERAAESEEEAEEAEEREEAREAEEEAEEAEAAESEEREAEESEEEASEEEREEES 
6345 3% - UNSIGNED DIVIDE ROUTINE - 
6346 34 THIS SUBROUTINE IS USED TO DIVIDE A 32 BIT UNSIGNED DIVIDEND BY A 
6347 34 16 BIT UNSIGNED DIVISOR GIVING A 16 BIT QUOTIENT. ALL NUMBERS ARE 
6348 34 CONSIDERED TO BE UNSIGNED. A SUCCESS FLAG IS NOT SET ON RETURN IF 
caen 3% THE QUOTIENT WAS TOO BIG TO BE CONTAINED IN 16 BITS. 
3% 
6351 3# INPUTS: R1 - THE DIVISOR, UNSIGNED, 16 BITS. 
6352 34 R2 - MOST SIGNIFICANT WORD OF THE DIVIDEND, UNSIGNED, 16 BITS. 
iy 34 R3 - LEAST SIGNIFICANT WORD OF THE DIVIDEND, UNSIGNED, 16 BITS. 
3% 
6355 3 OUTPUTS: Ri - QUOTIENT, UNSIGNED, 16 BITS (177777 IF OVERFLOW). 
oie 3% CARRY - SUCCESS FLAG, SET IF COMPLETE QUOTIENT FITS IN 16 BITS. 
3% 
oss 3# CALLING SEQUENCE: JSR PC,UNSOIV 
3% 
6360 3* COMMENTS: IF THE DIVISOR IS O THE QUOTIENT IS RETURNED AS ALL ONES 
oot 3% (177777) AND THE CARRY IS CLEAR REGARDLESS OF THE DIVIDEND. 
3* 
6363 3# SUBORDINATE ROUTINES CALLED: NONE. 
6364 S-— 88080N606404666646466464666666666666666666066404666666446646466066466466646666606664466664 
6365 
6366 026454 UNSDIV:: SAVE 3; SAVE = OF GPRS RO THRU RS. 
ener 026454 004567 156644 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
3¢ 
oes ; CHECK FOR QUOTIENT GREATER THAN 16 BITS CONDITION. 
i- 
6370 026460 010204 MOV R2,R4 sGET MSW OF DIVIDEND FOR SUBTRACT. 
6371 026462 160104 SUB R1,R4 sSUBTRACT DIVISOR FROM MSW OF DIVIDEND. 
6372 026464 103403 BCS 2s sIF IT OION'T GO, WE HAVE QUOTIENT < 16 BITS. 
6373 026466 012701 177777 MOV #-1,R1 sSET QUOTIENT TO ALL ONES (177777), 
pin 026472 000442 BR 60% sEXIT WITH CARRY CLEAR. 
esrs "SET UP COUNTERS AND VARIOUS WORKING GPRS. 
6378 026474 005004 2s: CLR R4 sCLEAR THE LSW OF THE DIVISOR. 
6379 026476 000241 CLC sCLEAR CARRY FOR THE SHIFT OF THE DIVISOR. 
6380 026500 006001 ROR R1 s DIVISOR BY 
6381 026502 006004 ROR R4 s 2CUNSIGNED) 
ot 026504 012700 000020 MOV #16. ,RO sSET UP INITIAL SHIFT COUNT TO 16. 
i¢ 
rae : THE SUBTRACT AND SHIFT LOOP. 
6386 026510 010246 as: MOV R2,-CSP) sSAVE MSWORD OF DIVIDEND. 
6387 026512 010346 MOV R3,-CSP) 1SAVE LSWORD OF DIVIDEND. 
6388 026514 160403 SUB R4,RS sLSWORD DIVIDEND - LSWORD OF DIVISOR. 
6389 026516 005602 SBC R2 sMSWORD oo - BORROW . 
6390 026520 103402 BcS 6% sIF BORROW FROM BORROW SUBTRACT, IT DION’ T GO. 
6391 026522 160102 SUB R1,R2 SMSWORD DIVIDEND - MSWORD OF DIVISOR. 
oo 026524 103003 BCC 8s sIF NO BORROW, IT WENT, CARRY IS CLEAR. 
t¢ 
6394 s IT DION‘'T GO, SO WE SHIFT A 1 INTO THE QUOTIENT (COMPLEMENTED LATER). 
oor s CARRY IS SET. 
i- 
6397 026526 012603 6%: MOV (SP)+,R3 sRESTORE LSWORD OF DIVIDEND. 


6398 026530 012602 MOV (SP )+,R2 sRESTORE MSWORD OF DIVIDEND. 
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GLOBAL SUBROUTINE 
asap 026532 000401 


10$ 


M13 


sGOTO SHIFT 1 INTO THE QUOTIENT. 


3° 
: IT WENT, SO WE RESTORE THE STACK AND SHIFT A O INTO QUOTIENT (WILL BE 


; COMPLEMENTED LATER). 


g° 
8$: MOV 


10$: ROL 


CSP)+,CSP)+ 
THE RESULT OF THE SUBTRACT ATTEMPT INTO THE QUOTIENT SHIFT REG. 


RS 


CARRY IS CLEAR. 


sPOP THE SAVED DIVIDEND OFF OF THE STACK. 


sSHIFT NEXT BIT INTO THE INVERTED QUOTIENT. 
sDIVIDE THE 

s DEVISOR BY 

s__2 CUNSIGNED). 

sCOUNT THIS SHIFT AND SUBTRACT. 

;LOOP FOR ANOTHER SHIFT &€ SUB IF NOT DONE. 
sGET QUOTIENT FROM INVERTED QUOTIENT. 


HER ROUND UP OR LEAVE QUOTIENT ALONE. 


R3 
12% 
R4,R3 
14% 


EXTRA SUBTRACT WENT. 


RS 
14$ 
RS 


sCLEAR THE CARRY FOR THE SHIFT OF THE DIVIDEND. 
sMULTIPLY LSWORD OF DIVIDEND BY 2, MSWORD IS 0. 
sIF CARRY FROM SHIFT, ROUND UP. 

sSUBTRACT DIVISOR FROM DIVIDEND. 

sIF BORROW, DON’T ROUND UP. 


sINCREMENT THE QUOTIENT BY ONE. 
sIF NO OVERFLOW, WE LEAVE THE ROUND UP. 
sD0N'T LET ROUNDING CAUSE OVERFLOW. 


PASS QUOTIENT AND EXIT. 


RS,R1 


R1 


MOV 
JSR 


sPASS QUOTIENT BACK IN R1. 
sINOICATE NO OVERFLOW. 


sRESTORE GPRS, LEAVE THE FOLLOWING INTACT: 

Ri, RiSLOTCSP) sPUT R1 IN STACK SLOT. 
PC, de sRETURN TO PREGOS SUBRT. 
RL - 16 BIT, UNSIGNED QUOTI IENT, 

;CARRY - SET INDICATES NO OVERFLOW (SUCCESS). 


SEQ 168 
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010163 


016301 
00520 


1 
001002 
012701 
010163 


156510 
005234 


003402 
003142 


003202 
003402 


003542 


177777 
003542 


003442 


-SBTTL GLOBAL SUBROUTINE - UPDCHR - 

FO RRERAARAARAARSESEAAAERASEEEARAREEEARABRERAREREARAEAERAREEAAEAREREAEAREREREEAEEKE 
3* - UPDATE CHARACTER POINTERS AND COUNTERS ROUTINE - 

3% THIS SUBROUTINE UPDATES THE POINTERS AND COUNTERS ASSOCIATED WITH 

34 THE RECEPTION OF A CHARACTER ON A SPECIFIED LINE. THE RECEIVE CHAR, 

3% POINTER IS SET TO THE NEXT EXPECTED CHARACTER, THE RECEIVE CHAR COUNT 
3* IS INCREMENTED, AND THE COUNT IS CHECKED TO DETERMINE IF THE RECEPTION 
3* IS COMPLETE. IF THE RECEPTION IS COMPLETE THE RECEPTION DONE FLAG 

3% IS SET FOR THE SPECIFIED LINE. 

3% 

;* INPUTS: R3 - LINE NUMBER TIMES 2 OF LINE ON WHICH CHAR WAS RECEIVED. 
3* BITTBL - LABEL OF TABLE OF WORDS USED TO FORM SINGLE BIT MAPS 
3% CHCNTB - BASE OF NUMBER OF CHARS TO TX ON EACH LINE TABLE. 

3% OPENDB - BASE OF DATA PATTERN END ADDRESSES TABLE. 

34 DPLENB - BASE OF DATA PATTERN LENGTHS TABLE. 

3% RXCNTB - BASE OF THE RX CHARACTER COUNTERS TABLE. 

3% RXPTRB - BASE OF THE RX CHARACTER POINTERS TABLE. 

3% TXRXLB - BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 

34 

3* OUTPUTS: FOLLOWING VARIABLES UPDATED FOR LINE ON WHICH CHAR WAS RECEIVED: 
3% RXCNT - COUNT OF THE NUMBER OF CHARACTERS RECEIVED ON LINE. 

34 RXDONF - RX DONE FLAGS WITH BITO FOR LINE O ... CUPDATED). 

3% RXPTR - UPDATED TO POINT TO THE NEXT EXPECTED CHAR ON LINE. 

3% 

3# CALLING SEQUENCE: JSR PC ,.UPDCHR 

3% 

3 COMMENTS: 


3% 
3# SUBORDINATE ROUTINES CALLED: NONE. 
Fr SKHKSHHHEAAASSSSESASAAASASSSESASESESEASEEEEASEAEESEEAESSEESSESSSSEESEAASESEEEEEALEEDE 
UPDCHR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV TXRXLBCR3),R2 GET TX LINE NUMBER OFFSET FOR THIS RX LINE. 


3¢ 
; UPDATE THE RX DATA POINTER WITH WRAPAROUND AT THE END OF THE DATA PATTERN. 
sg 
MOV RXPTRBCR3),R1 sGET THE RX DATA POINTER FROM THE RX PTR TABLE. 


INC Ri s INCREMENT THE RX POINTER VALUE BY 1. 

CMP R1,DPENDB(R2) ;CMP RX PTR VALUE WITH ADR OF END OF DATA PAT. 

BLO 2s sSKIP WRAPPING RX PTR AROUND IF NOT AT END. 

SUB DOPLENB(R2),R1 ;WRAP RX PTR AROUND TO START OF DATA PATTERN. 
2s: MOV R1,RXPTRBCR3)  ;UPDATE THE RX POINTER WITH THE NEW VALUE. 


— 
; UPDATE THE RX CHARACTER COUNT WITH OVERFLOW DETECTION. 
3 =~ 
MOV RXCNTBCR3),R1 ;GET THE RX CHARACTER COUNT. 


INC R1 s INCREMENT THE RX CHAR COUNT VALUE BY 1. 
BNE as sSKIP SETTING COUNT TO MAX IF NO OVERFLOW. 
MOV #-1,R1 sSET RX CHAR COUNT VALUE TO MAX VALUE. 
roy MOV R1,RXCNTBCR3) ;UPDATE THE RX CHAR COUNT WITH NEW VALUE. 


; * CHECK FOR RX COMPLETION ON THIS LINE. 
s IF RX IS COMPLETE ON THIS LINE, SET THE CORRECT RX DONE FLAG. 


ge 
MOV CHCNTBCR2),R4 ;GET THE NUMBER OF TX CHARS IN COMPLETE 7x. 
CMP R1,R4 sCOMPARE RX CHAR COUNT WITH NUMBER OF 7X CHARS. 
BLO 60$ sEXIT ROUTINE IF NOT ALL CHARS RECEIVED. 


_—— -—-— - ——- 7 


SEQ 169 
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GLOBAL SUBROUT 
6495 026674 
6496 
6497 026702 


026702 
6498 026704 


056367 002364 


004736 
000207 


153602 


BIS 
60$: PASS 
RTS 


BITTBLCR3),RXDONF 


PC 


Bi4 


ACRO M1200 12-DEC-83 16:16 PAGE 112-1 
UPDCHR - 


JSR 


rms A 


sRESTORE GPRS. 
PC,@(SP)+ 


sSET THE RX DONE FLAG FOR THIS LINE. 


sRETURN TO PREGOS SUBRT. 


SEQ 170 


Ci4 


maa 
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GLOBAL SUBROUTINE ANSUP 
6500 -SBTTL GLOBAL SUBROUTINE - VANSUP - 
6501 BHF SHHSHEHHHSEASEEAESESASEHSESEEHEHEEEEEEEEEEHEEEEEES* CHEBEEAEEESEEEEEEEEESEEEEEEOEELE 
Seok 3¢ - TRANSMISSION / RECEPTION SET-UP ROUTINE - 
6 34 
6504 34 THIS ROUTINE IS USED TO INITIALISE BOTH THE DUT AND THE 
6505 34 TRANSMISSION/RECEPTION CONTROL PARAMETERS TO THE CORRECT 
6506 34 STATE, PRIOR TO A SINGLE CHARACTER OR DMA TRANMISSION, 
6507 36 RECEPTION TEST. 
6508 34 
6509 3@ INPUTS: Rl - TX, RX LPR CONTENTS. 
6510 34 R2 - START ADDRESS OF DATA PATTERN TO TRANSMIT. 
6511 3¢ R3 - LENGTH OF DATA PATTERN. 
6512 34 R4 - NUMBER OF PATTERNS TO TRANSMIT. 
6513 34 ACTLNS - CONTAINS A BIT MAP OF ALL CURRENTLY ACTIVE LINES. 
6514 34 LOPBCK - CONTAINS THE TYPE OF LOOPBACK MODE SELECTED. 
tet :¢ CBB - LABEL AT BASE OF TX/RX CONTROL BLOCK. 
3° 
6517 :@ OUTPUTS: THE CONTENTS OF THE TX/RX CONTROL BLOCK (CCB) ARE DESTROYED. 
6518 34 THE INDIRECT ADORESS FIELD OF THE DUT CSR MAY BE DESTROYED. 
6519 36 THE DUT'S LPR’'S AND LNC'S MAY BE MODIFIED. 
6520 34 THE FOLLOWING POINTERS AND COUNTERS ARE INITIALISED; 
6521 3* CHCNT ,CHRTGT ,OPEND,OPLEN,EXCNT ,RXCNT ,.RXPTR, TXCNT, 
6S22 3¢ TXPTR, TXRXL. 
eas 36 CHRTOT, RXDONF, TXDONF AND TXINTF ARE CLEARED. 
34 
oo. 3@ CALLING SEQUENCE: JSR PC, VANSUP 
3a 
6527 3@ COMMENTS: MODEM eo MODE IS INHIBITED IF IT HAS BEEN SELECTED 
6528 34 VIA HAROWARE P-TABLE QUESTIONS, AND INTERNAL LOOPBACK 
6S29 36 IS FORCED TO TAKE PLACE. 
6530 3% 
6531 34 
6532 3@ SUBORDINATE ROUTINES CALLED: CONMAP,RXENBL,TXRINI. 
os B--— SSHSSHSESSHSSSSSEHSSSSSSOESESSSSSSSSSESSEHESSSSSSESSESSSSESEEEKEEHEEEAEKESESEEOEED 
6535 026706 VANSUP:: SAVE sSAVE CONTENTS OF THE GPR’'S RO THRU RS. 
026706 004567 156412 JSR RS, GOS sCALL REGISTER SAVE SUBRT. 
6536 026712 005067 153560 CLR CHRTOT :CLEAR TOTAL RECEIVED CHAR COUNTER. 
6537 026716 005067 153342 CLR TXINTF sCLEAR FLAGS USED TO LOG OMA H.OVER ERRORS. 
6538 026722 005067 153554 CLR TXDONF sCLEAR THE TX DONE FLAGS. 
ase 026726 005067 153552 CLR RXDONF sCLEAR THE RX DONE FLAGS. 
3° 
Sean s SET UP THE TRANSMISSION/RECEPTION CONTROL BLOCK TO THE DESIRED STATE. 
= 
6543 026732 010167 154164 MOV R1,C68 sSET CONTENTS OF LPR PARAMS IN TX/RX C.BLK. 
6544 026736 012701 003122 MOV CBB ,R1 sGET BASE ADORESS OF CONTROL BLOCK. 
6545 026742 005201 INC R1 s INCREMENT ADORESS FOR NEXT WORD 
6546 026744 005201 INC Ri VINITIALISE THE FOLLOWING IN THE CNTRL.BLK: 
6547 026746 012721 000004 Mov @4,(R1)> 3 LNCTRL PARAMETER, ENABLE RECEIVERS. 
6548 026752 010221 MOV R2,CR1Do s START ADORESS OF — PATTERN. 
6549 026754 010321 MOV R3,CR1)« s DATA PATTERN LENGTH 
6550 026756 010421 MOV R4,CR1)« s NUMBER OF DATA PATTERNS TO TRANSMIT. 
6551 026760 016721 153206 MOV ACTLNS,CR1)>+ ; BIT MAP OF LINES TO INITIALISE. 
6552 026764 032767 000004 153202 BIT @8IT2,LOPBCK sTEST IF MODEM L ACK MODE HAS BEEN SELECTED. 
6553 026772 001404 BEQ 2s sDONT SELECT INTERNL LOPBCK IF STAGRD OR LOCAL. 
6554 026774 012702 000001 MOV #1,R2 sFORCE INTERNAL LOOPBACK MODE TO BE SELECTED. 
6555 027000 110221 MOVB R2,(R1)>+ sINITIALISE LOOPBACK MODE IN CONTROL BLOCK. 
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027010 


027100 
027102 


012711 


004767 


012701 
016702 
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177777 
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177777 
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A 12-DEC-83 16:16 PAGE 113-1 SEQ 172 
BR 4$ sSKIP NEXT INSTRUCTION IF IN MODEM LOOPBACK. 
2s: MOVB LOPBCK,(R1)+ iSET LOOPBACK MODE. 
4$: INC R1 s INCREMENT ADDRESS FOR THE NEXT WORD. 
MOV #2,(R1) sSET AMOUNT OF OFFSET EACH TX STARTS AT TO 2. 


te 
s INITIALISE THE DUT ANDO THE ASSOCIATED ya Sand gal AND COUNTERS, TO THE STATE 
s DICTATED BY THE CONTENTS OF THE TX/RX CONTROL BLOCK. 

g¢ 


JSR PC, TXRINI sINITIALISE OvuT. 

3¢ 

3; INITIALISE POINTERS AND COUNTERS FOR INACTIVE LINES TO ZERO. 

5* 
MOV @MAPLNS ,R1 3GET THE LINE BIT MAP FOR ALL LINES. 
MOV ACTLNS,R2 3GET THE ACTIVE LINE BIT MAP. 
COM R1 3 
COM R2 8 
BIC R1,R2 sGENERATE AN IN-ACTIVE LINE BIT MAP. 
MOV R2,CBMAPA sMOVE BIT MAP TO THE CONTROL BLOCK. 
CLR CBOPNA sCLEAR THE REPEAT TX COUNT IN CNTRL BLCK. 
JSR PC, TXRINI 3SET UP PARAMETERS FOR INACTIVE LINES. 


3° 
s DISABLE RECEIVERS ON ALL LINES TO ENSURE CORRECT INITIALISATION OF ONLY THE 
3s LINES THAT ARE SELECTED. 

53> 


MOV —s- @HAPLINS. RS :SET-UP BIT MAP FOR ALL LINES. 
JSR —s- PC RXDSBL }DISABLE RX ON ALL LINES. 
3¢ 
; ENABLE RECEIVERS UN ASSOCIATED (RX) LINES. 
. MOV —ACTLNS.RS GET THE ACTIVE LINE BIT MAP 
JSR —s- PC, CONMAP GENERATE AN ASSOCIATED LINE BIT MAP 
SSRs PCL RXENBL JENABLE RECEIVERS ON ASSOCIATED LINES. 
60$: PASS SRESTORE GPR‘S. 
days | st JSR —s- PC. BC SP) ;RETURN TO PREGOS SUBRT. 


E14 
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GLOBAL SUBROUTINE WAIBIS 
6591 -SBTTL GLOBAL SUBROUTINE - WAIBIS - 
6592 FOF SPHHAHHEHSSHHHSAASEASEEASHEEEEEEAREREREREEEASEREEESHADEEEREEEEEEEEAEEEROEREAEEEESD 
6593 14 - WAIT FOR BIT SET ROUTINE - 
6594 34 THIS SUBROUTINE WAITS FOR THE SPECIFIED BIT TO BECOME SET. IF THE 
6595 34 SPECIFIED BIT GOES TO A SET STATE WITHIN THE SPECIFIED TIME-OUT 
6596 34 PERIOD A SUCCESS INDICATION IS RETURNED BY THIS ROUTINE. 
6597 34 THE LAST VALUE WHICH IS READ LOOKING FOR THE CONDITION IS RETURNED TO 
ae 34 ALLOW THE USE OF THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS. 
34 
6600 7 INPUTS: Ri - TIME-OUT VALUE AND BIT NUMBER INDICATION: 
6601 34 BITS 15 THRU 12 - NUMBER OF BIT TO TEST (RANGE O THRU 15). 
6602 3¢ BITS 11 THRU O - TIME-OUT VALUE IN MILLI-SECONDS (4095 MAX). 
6603 34 R2 - ADDRESS OF WORD CONTAINING THE BIT TO TEST. 
coon :¢ MSLCNT. 
3% 
6606 3# OUTPUTS: R2 - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 
6607 34 CARRY - SUCCESS FLAG (CARRY SET IF BIT SET BEFORE TIME-OUT). 
6608 3% 
6609 3@ CALLING SEQUENCE: MOV #130040,R1 sPASS BIT 11 (13 OCTAL) AND 
6610 pa s 32 (40 OCTAL) MS DELAY. 
6611 34 MOV @LABEL ,R2 sTEST BIT IN WORD AT “LABEL”. 
ot | 36 JSR PC,WAIBIS sWAIT 32 MS FOR BIT 11 TO SET. 
3% 
6614 3* COMMENTS: 
6615 3* 
6616 3@ SUBORDINATE ROUTINES CALLED: MSLGET. 
6617 B--— SESCHSSSSSSASSSSSESEEEEESSEEESHESESEASEEESEEKESESESEEEEEEEEEEEEEEEEEEEEEEEEEEEE 
6618 
6619 027104 WAIBIS:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
027104 004567 156214 RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
6620 027110 010204 MOV R2,R4 SET UP THE ADORESS PARAMETER FOR MSLGET. 
6621 027112 010102 MOV R1,R2 
6622 027114 042701 170000 BIC 170000,R1 sSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 
6623 027120 042702 007777 BIC 07777, R2 sSEPERATE LINE FIELD OF PASSED PARAM. 
6624 027124 000302 SWAB R2 sPUT LINE NUMBER FIELD IN LSBYTE. 
6625 027126 006202 ASR R2 sSHIFT THE LINE NUMBER FIELD INTO THE PROPER 
6626 027130 006202 ASR Re . POSITION TO USE IT AS A WORD TABLE ty 
6627 027132 006202 ASR R2 FOR THE TABLE LOOKUP OF THE LINE BIT MAP 
6628 027134 016202 002364 MOV BITTBLCR2),R2 iGET BIT MAP OF LINE TO TEST FROM TABLE. 
6629 027140 010203 MOV R2,R3 sINDICATE THAT THE BIT SHOULD BE SET. 
6630 027142 004767 172020 JSR PC ,MSLGET a FOR THE BIT TO BE SET WITHIN TIME-OUT. 
31 CARRY IS CORRECT UPON MSLGET RETURN. 
6632 027146 010002 MOV RO,R2 }PASS LAST VALUE READ AS OUTPUT PARAMETER. 
6633 027150 608: PASS R2 sRESTORE GPRS, EXCEPT THE FOLLOWING: 
027150 010266 000006 MOV R2, R2SLOTC( SP) sPUT Re IN STACK SLOT. 
027154 004736 JSR PC, @(SP)+ sRETURN TO PREGOS SUBRT. 
6634 s R2 - LAST VALUE READ LOOKING FOR CONDITION. 
6635 027156 000207 RTS PC s CARRY - SUCCESS FLAG (SET IF BIT FOUND SET). 


Fi4 
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GLOBAL SUBROUTINE WTWLNC 
6637 .SBTTL GLOBAL SUBROUTINE - WTWLNC - 
6625 gee acacia eeienememaiantR (yg og enemies 
6629 34 LINE CONTROL REGISTER SETUP ROUTINE - 
6640 Ts THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST (DUT) LINE 
6641 74 CONTRO REGISTERS (LNCTRL) TO THE SPECIFIED STATE. ONLY THE LNCTRLS 
6642 90 FOR The SPECIFIED LINES ARE ALTERED. 
3% 
6644 3; INPUTS: RO - NEW LINE PARAMETERS. 
6645 :4@ RS - BIT MAP OF LINES TO BE ALTERED. 
6646 30 CSRA - CONTAINS ADDRESS OF THE DUT CSR. 
6647 34 IESTAT - CONTAINS THE CURRENT STATE OF THE TX AND RX INTERRUPT 
6648 34 ENABLE BITS IN THE CSR. 
cea :@ LNCTRA - CONTAINS ADDRESS OF THE DUT LNCTRL REGISTERS. 
34 
6651 :@ OUTPUTS: LNCTAL - SPECIFIED DUT LINE CONTROL REGISTERS ARE ALTERED. 
34 
6653 : 3@ CALLING SEQUENCE: JSR PC, WTWLNC 
6654 34 
6655 3@ COMMENTS: 
6656 34 
6657 3@ SUBORDINATE ROUTINES CALLED: ALTFLD. 
6658 8-- £8886666666666666666846066664666664666666466666606666666666646666066466466464606466 
6659 
6660 027160 WIWLNC:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
all 027160 004567 156140 JSR R5,PREGOS sCALL REGISTER SAVE SUBRT. 
3¢ 
cece 3 SET UP THE PARAMETERS FOR THE CALL TO ALTFLD. 
ge 
6664 027164 016701 153020 OV LNCTRA,R1 sSET UP THE REGISTER ADDRESS PARAMETER. 
6665 027170 010002 MOV RO,R2 sSET UP THE DESIRED REGISTER CONTENTS. 
6666 027172 010503 MOV = R'5,,R3 3SET UP THE BIT MAP OF LINES TO ALTER. 
6667 027174 012704 177777 MOV @-1,R4 sSELECT ALL REGISTER BITS TO BE ALTERED. 
6668 3° 
sees ; CALL THE SUBROUTINE WHICH ALTERS THE REGISTER CONTENTS. 
t- 
6671 027200 004767 166706 JSR PC, ALTFLO sALTER THE REGISTER CONTENTS. 
6673 027204 608: PASS sRESTORE GPRS. 
027204 004736 JSR PC, @(SP)+ ;RETURN TO PREGOS SUBRT. 
6674 027206 000207 RTS PC 


SANs, aan Lea, 


G14 
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GLOBAL SUBROUTINE WTWLPR 
6676 -SBTTL GLOBAL SUBROUTINE - WTWLPR - 
6677 OF SMHEHHHHEHSHSAAHSASHASSEOADHHEASEEASEDEHESEEADAAERSEEAAEEEEEEEEEEAEEEESESEEEEEOESD 
6678 34 - LINE PARAMETER REGISTER SETUP ROUTINE - 
6679 34 THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST (DUT) LINE 
6680 34 PARAMETER REGISTERS (LPR) TO THE SPECIFIED STATE. ONLY THE LPRS FOR 
oeen 34 THE SPECIFIED LINES ARE ALTERED. 
3% 
6683 3@ INPUTS: RO - NEW LINE PARAMETERS. 
6684 34 RS - BIT MAP OF LINES TO BE ALTERED. 
6685 34 CSRA - CONTAINS ADORESS OF THE DUT CSR. 
6686 34 IESTAT - CONTAINS THE CURRENT STATE OF THE TX AND RX INTERRUPT 
6687 3% ENABLE BITS IN THE CSR. 
ere 34 LPRA - CONTAINS ADDRESS OF THE DUT LPR. 
3% 
rote 3# OUTPUTS: LPR - SPECIFIED DUT LINE PARAMTER REGISTERS ARE ALTERED. 
3% 
6692 3@ CALLING SEQUENCE: JSR PC, WTWLPR 
6693 3¢ 
6694 3@ COMMENTS: 
6695 34 
96 3@ SUBORDINATE ROUTINES CALLED: ALTFLD. 
6697 B-— SHSSHOSESSSSESSSSASHHESAEHSSERASSESESEARESAESESEHESESEAEEEEESEESEEEEEEEEEEEEEEE 
6699 027210 WTWLPR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
ere0 027210 004567 156110 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
3¢ 
eres ; SET UP THE PARAMETERS FOR THE CALL TO ALTFLO. 
3° 
6703 027214 016701 152764 MOV LPRA,R1 sSET UP THE REGISTER ADDRESS PARAMETER. 
6704 027220 010002 MOV RO,R2 sSET UP THE DESIRED REGISTER CONTENTS. 
6705 027222 010503 MOV RS,R3 sSET UP THE BIT MAP OF LINES TO ALTER. 
th 027224 012706 177777 MOV @-1,R4 sSELECT ALL REGISTER BITS TO BE ALTERED. 
3¢ 
dae 3 CALL THE SUBROUTINE WHICH ALTERS THE REGISTER CONTENTS. 
3° 
hay 027230 004767 166656 JSR PC,ALTFLO sALTER THE REGISTER CONTENTS. 
6712 027234 608: PASS sRESTORE GPRS. 
027234 004736 JSR PC, @CSP)+ sRETURN TO PREGOS SUBRT. 
6713 027236 000207 RTS PC 


H14 
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INTERRUPT SERVICE ROUTINE CLKINT 
6715 -SBTTL INTERRUPT SERVICE ROUTINE - CLKINT - 
6716 BOF SREAHAHAEKSEASAASASLERALEHTREREAEEREAEEEEEAAAEEERLEDRAAERAEEEEEAEAEEEAEESEEEEESE 
6717 34 THIS ROUTINE IS EXECUTED CLKHWRZ TIMES PER SECOND. IT DECREMENTS THE 
ere 3% TWO TIMER COUNTERS DOWN TO ZERO. 
i* 
6720 3* INPUTS: TIMER1 - TIMER COUNTER 41. 
6721 34 TIMER2 - TIMER COUNTER @2. 
oiss 3% TIMERS - TIMER COUNTER FOR CALL OF BREAK MACRO. 
34% 
tin 3* OUTPUTS: THE 2 TIMER COUNTERS ARE DECREMENTED IF THEY ARE NOT ZERO. 
34 
6726 3* CALLING SEQUENCE: PUT @CLKINT IN THE CLOCK INTERRUPT VECTOR SLOT. 
6727 34 PUT THE DESIRED TIME PERIOD (SECONDS TIMES CLKHRZ) IN 
6728 34 EITHER TIMER1 OR TIMER2 AND POL’ THE RESPECTIVE TIMER 
rt a 34 COUNTER TO DETECT ITS GOING TO O ON TIME-OUT. 
34 
6731 3@ COMMENTS: THE 2 COUNTERS WILL NOT WRAPAROUND BUT WILL STOP AT 0. THIS 
6732 34 ALLOWS THE DETECTION OF A TIME-OUT ANY TIME AFTER THE TIME-OUT 
dh 3% HAS OCCURRED UNTIL THE TIMER COUNTER IS SET TO ANOTHER VALUE. 
3% 
6735 3# SUBORDINATE ROUTINES CALLED: NONE. 
6736 F--— SHHSHHSHASHSSSSASESSESSSESEKESAEAAEHSESESERESASEAEKEEEEKEEEEKEEEEEEEEEEEEEEED 
6737 
6738 027240 005767 153034 CLKINT:: TST TIMER1 sCHECK FOR TIMER1 AT ZERO. 
6739 027244 001402 BEQ 2s sBRANCH TO LEAVE IT AT ZERO IF IT IS ZERO. 
6740 027246 005367 153026 DEC TIMER1 sOECREMENT TIME COUNT. 
6741 027252 005767 153024 2s: TST TIMER] sCHECK FOR TIMER2 AT ZERO. 
6742 027256 001402 BEQ 4% sBRANCH TO LEAVE IT ALONE IF IT’S ALREADY ZERO. 
6743 027260 7 153016 DEC TIMER] sOECREMENT TIME COUNT. 
6744 027264 005367 153014 4%: DEC TIMERS sDECREMENT THE BREAK COUNT. 
6745S 027270 001 BNE 60% }EXIT IF NOT TIME TO CALL BREAK. 
6746 027272 016767 153010 153004 MOV BCOUNT , TIMERS sSET UP TIME TILL NEXT BREAK. 
6747 027300 01 MOV RO, -CSP) sSAVE CONTENTS OF RO FROM BREAK MACRO. 
6748 027302 BREAK sCHECK FOR OPERATOR CONTROL/C. 
027 104422 TRAP C$BRK 
6749 027304 012600 MOV (SP)+,RO sRESTORE CONTENTS OF RO. 
6750 027306 60%: RTI 
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INTERRUPT SERVICE ROUTINE XCHRS 


-S8TTL INTERRUPT SERVICE ROUTINE 


- RXCHRS - 
jee alate ng ey mg te go ea ce teeta 
3% DMA RECEIVE INTERRUPT SERVICE ROUTINE - 
34 THIS ROUTINE EXECUTES IN RESPONSE TO AN INTERRUPT CAUSED BY THE DUT 
34 RX.DATA.AVAIL BIT BECOMING ACTIVE. THIS ROUTINE READS CHARACTERS FROM 
34 THE DUT RECEIVE CHARACTER FIFO AND DEPOSITS THEM INTO THE RECEIVE 
3* BUFFER IN MEMORY. F THE NUMBER OF CHARACTERS IN THE RECEIVE BUFFER 
pe EXCEEDS A SPECIFIED THRESHOLD, TRANSMISSION IS HALTED (BY CLEARING ALL 
34 DUT TX.ENABLE BITS) AND IF THE RECEIVE BUFFER IS FULL RECEPTION IS 
34 HALTEG (BY DISABLING RX INTERRUPTS). THE ROUTINE EXITS IF THE RECEIVE 
34 BUFFER BECOMES FULL OR IF A CHARACTER IS READ FROM THE FIFO WITH THE 
34 DATA.VALIO BIT CLEAR. 
3% 
3* INPUTS: RBUFA - CONTAINS ADDRESS OF THE DUT RX CHARACTER FIFO. 
34 RXBCNT - RX BUFFER CHARACTER COUNT. 
3% RXBDOTX - EQUATED TO RX BUFFER LEVEL AT WHICH TO ao T™. 
3¢ RXBEND - LABEL AFTER END OF THE RX BUFFER AREA IN MEMORY 
34 RXBFUL - EQUATED TO THE CAPACITY OF THE RX BUFFER. 
34 RXBIPT - POINTER TO NEXT AVAILABLE INPUT SLOT OF RX BUFFER. 
34 RXBSTA - LABEL AT START OF RX BUFFER AREA IN MEMORY. 
3% 
3@ OUTPUTS: RXBIPT - UPDATED TO POINT TO NEXT INPUT SLOT OF RX BUFFER. 
34 RXBCNT - RX ly ay CHARACTER COUNT C INCREMENTED). 
34 TXENBM - MAP OF PREVIOUS DUT TX.ENABLE STATES. 
34 CARRY - “SUCCESS” FLAG (SET IF BUFFER IS NOT FULL). 


e 
3@ CALLING SEQUENCE: PUT THE ADORESS OF THE LABEL RXCHRS IN THE VECTOR 


* 
3¢@ COMMENTS: IF gy BUFFER IS FULL UPON ENTRY, THIS ROUTINE ABORTS THE 


s 
s# SUBORDINATE ROUTINES CALLED: RXIEO,TXDSBL. 
$-- SO6066606606660600660066060600066600660666000606006660060000600006000000000008 


RXCHRS: : MOV Re, -CSP) sSAVE CONTENTS OF GPR Re. 

2s: MOV SRBUFA,R2 sREAD A CHARACTER FROM THE DUT RX FIFO. 
BPL 60% sEXIT THE ROUTINE IF THE DATA.VALID BIT IS CLR. 

RXBCNT,@RXBFUL ;COMPARE BUFFER COUNT WITH a Gaerere. 

BLO ae sSKIP ABORT IF BUFFER IS NOT F 
JSR PC OOPS sABORT, MUST BE A PROGRAM ous. 

4%: MOV 3 oa sPUT THE CHAR IN THE BUFFER. 
ADO #2, RXBIPT SUPOATE POINTER TO THE eld Maney SLOT. 
CMP RXBIPT , @RXBEND sCHECK IF POINTER SHOULD WRAP AROUND. 
BLO 6s sSKIP WRAPAROUND IF POINTER IS NOT AT END. 
MOV @RXBSTA,RXBIPT ,;WRAP INPUT POINTER AROUND. 

6%: INC 


RXBCNT sCOUNT THIS CHARACTER AS BEING IN THE BUFFER. 
CMP RXBCNT,@RXBOTX ;CHECK FOR BUFFER AT DISABLE TX LEVEL. 
BLT 4) sSKIP DISABLING TX IF BUFFER LEVEL NOT CORRECT. 


TST TXDBLF i CHECK STATE OF TX DISABLE FLAG. 
BMI 8s sBRANCH IF TRANSMISSION ALREADY DISABLED. 
MOV RS, -CSP) 1 SAVE THE VALUE OF GPR RS. 


MOV @MAPLNS ,RS 
JSR PC, TXDSBL 


sSPECIFY THAT ALL LINES SHOULD 4, AFFECTED. 
MOV RS, TXENBM 


sCLEAR THE TX ENABLES FOR ALL 
sSAVE PREVIOUS TX ENABLE STATES IN STORAGE. 


SEQ 177 





OHU-11 FUNCTIONAL VERIFICATION 
INTERRUPT SERVICE ROUTINE 


68 
6812 027434 
68613 027442 


6814 
6815 027444 
68 


16 
6817 027450 
6818 027452 


012605 
012767 100000 


026727 153256 
103723 


004767 175116 
012602 
000002 


MACRO M1200 12-DEC-83 16:16 PAGE 118-1 SEQ 178 
- RXCHRS - 
MOV CSP)+,RS sRESTORE GPR RS. 
153052 MOV oBIT15, TXOBLF sPREVENT TX FROM BEING DISABLED AGAIN. 
000100 8$: CMP RXBCNT,ORXBFUL ;CHECK FOR BUFFER FULL CONDITION. 
BLO 2s sLOOP TO READ ANOTHER CHAR IF BUFFER NOT FULL. 
JSR PC ,RXIEO sBUFFER IS FULL, DISABLE RX INTERRUPTS. 
60$: CSP)+,R2 sRESTORE R2 TO ITS SAVED VALUE. 


MOV 
RTI 


J14 


PCN Ce Ce —_ ee 


K14 
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TRAP SERVICE ROUTINE TP4BRT 

6820 -SBTTL TRAP SERVICE ROUTINE - TP4BRT - 
6821 J FPAAAARAAAESAARASESEREASALESSAOEERALERELSEAALALEAESRERERARESEEESEEEEEEEEEAREEEEERESD 
6822 3* BUS TIME-OUT TRAP (004 TRAP) SERVICE ROUTINE - 
6823 34 THIS ROUTINE IS USED DURING THE DMA ADDRESS TEST. 
6824 34 IT DETERMINES IF THE 004 TRAP WAS CAUSED BY AN “EXPECTED” ERROR OR 
6825 34 NOT BY EXAMINING THE RETURN PC VALUE ON THE STACK. IF THE TRAP IS 
6826 34 UNEXPECTED, THIS ROUTINE JUMPS TO THE NORMAL DIAGNOSTIC SUPERVISOR 
cane 3% 004 TRAP HANDLING ROUTINE. 

3% 
6829 3* INPUTS: SP - POINTS TO THE PC WHERE THE TRAP OCCURED. 
6830 3% TRPAD2 - LABEL AT THE ADDRESS WHERE “EXPECTED” TRAPS OCCUR. 
rest 3% TP4FLG - 004 TRAP FLAGS. 

3* 
aacs 3 OUTPUTS: TP4FLG - BIT 15 IS SET IF “EXPECTED” TRAP OCCURED. 

3% 
6835 3# CALLING SEQUENCE: PUT ADDRESS POINTED TO BY TP4BRT IN 004 VECTOR. 
cast 34 OCCURENCE OF 004 TRAP VECTORS TO THIS ROUTINE. 

34 
6838 3@ COMMENTS: ANY 004 TRAP WHICH OCCURS AT AN ADDRESS OTHER THAN THAT LABELED 
6839 34 TRPAD2 WILL BE HANDLED BY THE NORMAL 004 TRAP SERVICE ROUTINE. 
ooee 3% THIS ROUTINE IS USED IN CONJUNCTION WITH CKTRPB SUBROUTINE. 

3% 
6842 3# SUBORDINATE ROUTINES CALLED: NONE. 
Seas FS SSSASSAKHSSSSASESSESSASASERAEESEEEEEEEEEEEE4EE4E666646666486666666664660666466064466 
6845 027454 021627 017412 TP4BRT:: CMP CSP), @TRPAD2 sCOMPARE EXPECTED ADOR WITH TRAP RET PC. 
6846 027460 001402 BEQ es sIF THEY MATCH, CONTINUE THIS ROUTINE. 
6847 027462 000177 152570 JMP @TP4vEC ;IF NOT, JUMP TO NORMAL 004 TRAP SERVICE RTN. 
6848 027466 052767 100000 152560 2%: BIS #B1IT15, TP4FLG iSET THE 004 TRAP OCCURED FLAG. 
6849 027474 000002 RTI sALL DONE, GO BACK TO THE TEST. 


Li4 


a 
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GLOBAL TRAP SERVICE ROUTINE - TP4RTN 
6851 -SBTTL GLOBAL TRAP SERVICE ROUTINE - TP4RTN - 
6852 { PRAAEAARARAAASEEEAEEAREEAEAAAESEEAABLEEEEEAAEEEEEAEAREROEEEREEAEARESEEEAREREEDEE 
6853 3% BUS TIME-OUT TRAP (004 TRAP) SERVICE ROUTINE - 
6854 3% THIS ROUTINE DETERMINES IF THE 004 TRAP WAS CAUSED BY 
6855 34 AN “EXPECTED” ERROR OR NOT BY EXAMINING THE RETURN PC VALUE ON THE 
6856 3* STAL<. IF THE TRAP IS UNEXPECTED, THIS ROUTINE JUMPS TO THE NORMAL 
oe 34 3% DIAGNOSTIC SUPERVISOR 004 TRAP HANDLING ROUTINE. 
3* 
6859 3* 
6860 3* INPUTS: SP - POINTS TO THE PC WHERE THE TRAP OCCURED. 
6861 34 ADRPTR - LABEL AT THE ADDRESS WHERE “EXPECTED” TRAPS OCCUR. 
oees 34 TP4FLG - 004 TRAP FLAGS. 
3* 
ro 3* OUTPUTS: TP4FLG - BIT 15 IS SET IF “EXPECTED” TRAP OCCURED. 
3% 
6866 3# CALLING SEQUENCE: PUT ADDRESS POINTED TO BY TP4RTN IN 004 VECTOR. 
6867 3% OCCURENCE OF 004 TRAP VECTORS TO THIS ROUTINE. 
6868 34 
6869 3* COMMENTS: ANY 004 TRAP WHICH OCCURS AT AN ADDRESS OTHER THAN THAT LABELED 
red 3% ADRPTR WILL BE HANDLED BY THE NORMAL 004 TRAP SERVICE ROUTINE. 
3% 
6872 3# SUBORDINATE ROUTINES CALLED: NONE. 
pod FFSSESASHSHSSSALEEESEASEEALELASEEAESEASEEEEEEEEEEEEEOEESOEEEEEEEEEEEEEEEEEEEEEREEEE 
6874 
6875 027476 021627 017362 TP4RTN:: CMP (SP), @ADRPTR sCOMPARE EXPECTED ADR AGAINST TRAP RET PC. 
6876 027502 001402 BEQ 2s sIF THEY MATCH, CONTINUE THIS ROUTINE. 
6877 027504 000177 152546 JMP QTP4vVEC sIF NOT,JUMP TO NORMAL 004 TRAP SERVICE RTN. 
6878 027510 052767 100000 152536 2%: BIS #BIT15, TP4FLG }SET THE 004 TRAP OCCURED FLAG. 
6879 027516 000002 RTI sALL DONE, GO BACK TO THE TEST. 


M14 
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INTERRUPT SERVICE ROUTINE TXDMA 


027534 
027540 
027542 
027544 
027550 


027552 
027554 


027560 
027566 


004567 155600 
017701 152450 
010100 
000402 


017701 152440 
100033 


042701 177760 


016405 002364 


026464 903502 003442 
103403 


-SBTTL INTERRUPT SERVICE ROUTINE - TXDMA - 

i++ Se ae ee a ee eee 
3% DMA TRANSMIT INTERRUPT SERVICE ROUTINE - 

3% THIS ROUTINE EXECUTES IN RESPONSE TO AN INTERRUPT CAUSED BY THE DUT 

34 TX.ACTION BIT oe ACTIVE. THIS ROUTINE INITIATES THE TX OF A 

3* NEW OMA BUFFER OF CHARACTERS OR SETS THE TX DONE FLAG FOR THE CORRECT 
3% LINE IF TX IS COMPLETE ON THAT LINE. 

3% 

3* INPUTS: BITTBL - LABEL OF eae OF WORDS EACH WITH A BIT SET. 

3* CNCNTB - BASE OF @ OF CHARS TO TX/RX TABLE. 

:* CSRA - CONTAINS THE ADDRESS OF THE DUT CSR. 

3% DPENDB - BASE OF THE DATA PATTERN END TABLE + ona PER LINE). 
3% DPLENB - BASE OF THE DATA PATTERN LENGTH TABLE 

3% IESTAT - PRESERVED STATES OF THE DUT INTERRUPT. ENABLE BITS. 

34 TXCNTB - LABLE AT BASE OF THE TX CHARACTER COUNTER TABLE. 

3% TXPTRB - LABEL AT BASE OF THE TX DATA PATTERN POINTERS TABLE. 
3% 

3# OUTPUTS: TXCNTX - COUNTERS INCREMENTED FOR LINES ON WHICH CHARS SENT. 

34 TXDONF - TX DONE FLAGS SET FOR LINES WHICH HAVE SENT ALL CHARS. 
3% TXINTF - TX INT FLAGS (BIT SET IF DMA.HO FOUND SET ON LINE). 


& 
3# CALLING SEQUENCE: | PUT THE ADDRESS OF THE LABEL TXDMA IN THE VECTOR 
:* LOCATION. 


a 
3 COMMENTS: 


3% 
3# SUBORDINATE ROUTINES CALLED: DODMA. 
B-— SEAKSSASSSASESSSASSAEASSEHASAAAEESEAEEEEEERASESESEAESESEEEEESEEEEEEESESEEEEEOERE 


TXOMA:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV @CSRA,R1 sREAD THE CONTENTS OF THE DUT CSR. 
MOV R1,RO s SAVE INITIAL CONTENTS OF IND.ADR.REG FIELD. 
BR as sBRANCH TO SKIP DOUBL READING OF DUT CSR. 


3¢ 
s READ THE CONTENTS OF THE DUT CSR. THIS WILL CLEAR THE TX.ACTION CSR BIT. 
s IF TX.ACTION IS NOT SET, EXIT THIS ROUTINE. 

; DETERMINE THE LINE FOR WHICH THE TX.ACTION WAS SET 

3 CALCULATE AN OFFSET FOR USE IN ACCESSING TABLES (2 TIMES THE LINE NUMBER). 
3; GET THE BIT MAP OF THIS LINE. 


2s: MOV @CSRA,R1 sREAD THE CONTENTS OF THE DUT CSR. 
4%: BPL 60% sEXIT ROUTINE IF TX.ACTION IS CLEAR. 
SWAB R1 sCALCULATE THE LINE NUMBER OF THE LINE WHICH IS 
BIC #177760,R1 s_ ASSOCIATED WITH THE TX.ACTION. 
MOV R1,R4 sCALCULATE AN OFFSET FOR USE IN ACCESSING 
ASL R4 s_ LINE COUNTER AND POINTER IN TABLES. 


MOV BITTBLCR4),RS ;GET THE BIT MAP OF THIS LINE. 


5 

s GET THE TX CHARACTER COUNTER FOR THIS LINE. 

; IF ALL THE CHARACTERS HAVE BEEN SENT FOR THIS LINE: 

i SET THE TX DONE FLAG FOR THIS LINE. 

H DON'T SEND A CHAR TO THE LINE (NO MORE TX.ACTIONS ON THIS LINE). 
; LOOP TO CHECK THE TX.ACTION FOR ANOTHER LINE. 

: 


CMP 5 acetate CHCNTBCR4) ;COMPARE @ CHARS SENT AND TX COUNT. 
BLO sGO TO SEND A CHAR IF NOT ALL CHARS SENT. 


SEQ 181 


DHU-11 FUNCTIONAL VERIFICATION oe M1200 12-Dt 2-83 16:16 PAGE 121-1 
INTERRUPT SERVICE ROUTINE TXDMA 


027570 
027574 


027576 
027602 


027606 
027612 


027614 
027620 


027622 


050567 
000757 


016403 
016402 


004767 
103403 


050567 
000402 


060364 


000742 


016701 
042700 


050001 
010177 


004736 
000002 


152706 


003202 
003342 


170172 


152444 


003502 


152400 
177760 


152332 


3 
3- 
6$: 


8$: 


3¢ 

; LOOP TO CHECK THE TX.ACTION BIT FOR ANOTHER LINE. 
fe 
10%: 
60%: 


BIS 
BR 


MOV 
MOV 


JSR 
BCS 


BIS 
BR 


N14 


RS, TXDONF 
2s 


DPLENB(R4),R3 
TXPTRBCR4),R2 


PC ,DODMA 
8$ 


RS, TXINTF 
10% 


ADD R3, TXCNTBCR4 ) 
BR as 

MOV IESTAT,R1 

BIC #177760,RO0 

BIS RO,R1 

MOV R1,@CSRA 
PASS 


JSR 


sSET THIS LINE‘S TX DONE FLAG. 
sLOOP TO CHECK TX.ACTION AGAIN. 


3+ 

3 START THE DMA OF THE NEXT BUFFER (DATA PATTERN) ON THIS LINE. 
GET THE DATA PATTERN LENGTH FOR THIS LINE. 
GET THE START ADDRESS OF THE DATA PATTERN. 


sPASS DATA PATTERN LENGTH FOR LINE TO DODMA. 
sPASS THE TX START ADR TO DODMA. 


3* 
; WRITE DMA PARAMETERS TO THE DUT. 


sSKIP ERROR IF DODMA WAS SUCCESSFUL. 
3+ 
; SET THE PROPER BIT OF THE TX INTERRUPT FLAGS TO INDICATE THE LINE ERROR. 


s INDICATE THE ERROR 


;SKIP UPDATING POINTERS AND COUNTERS. 


3¢ 
s UPDATE THE TX CHARACTER FOR THIS LINE. 
; UPDATE THE TX BUFFER POINTER FOR THIS LINE. 


sADD THE DATA PAT LENGTH TO THE TX COUNT. 


sLOOP BACK TO CHECK TX.ACTION BIT AGAIN. 


sGET THE PRESENT STATES OF TX.IE & RX.IE BITS. 
sGET SAVED IND.ADR.REG FIELD BITS. 
sCOMBINE IND.ADR.REG FIELD BITS WITH IE BITS. 


sRESTORE THE DUT CSR 


sRESTORE GPRS 
PC, @C(SP)-+ 


IND.ADR.REG FIELD. 


sRETURN TO PREGOS SUBRT. 


SEQ 182 


BiS 
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INTERRUPT SERVICE ROUTINE 


6973 
6974 


027652 


000167 
000000 


104425 


H 
; FVTA.RPT 
H 
i 


-SBTTL REPORT CODING SECTION 


ioe 


s THE REPORT CODING SECTION CONTAINS THE 


s “PRINTS” CALLS THAT GENERATE STATISTICAL REPORTS. 


BGNRPT 


EXIT RPT 


-EVEN 
ENORPT 


LSRPT:: 


L10016: 


- WORD 
. WORD 


TRAP 


J$JMP 


L10016-2-. 


CSRPT 


Lis 
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PROTECTION TABLE 


027660 
027660 


027660 
027662 
027664 


027666 
9 


177777 
177777 
177777 


-SBTTL PROTECTION TABLE 


{ SESCCAASAALASSCASACHSSSALG ASA CTLAGKSCAAGASASTSASMGGKKSSAH LAS SAGAISSASAGAAGAAOSASSASS CSA DSAOS 


see 
s THIS TABLE IS USED BY THE RUNTIME SERVICES 


FVTSKL4.P11 


s TO PROTECT THE LOAD MEDIA. 


BGNPROT 


L$PROT:: 


sOFFSET INTO P-TABLE FOR CSR ADDRESS 


sOFFSET INTO P-TABLE FOR MASSBUS ADDRESS 


sOFFSET INTO P-TABLE FOR DRIVE NUMBER 


a 


D1i5 
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PROTECTION TABLE 


7074 027734 
027734 
027740 


012700 
104447 


103416 
012700 
104447 
103556 
012700 
104447 
103555 
012700 
104447 
103161 
000167 


104433 


012700 
104462 


000037 


000035 


000114 


SEQ 185 


FSSEAAACAKACASAGHSLGASHISAKAGKASSAISS SL IAAISSSSSHAS CG SAMAASATAAAM DASA SAASSAAASNA SASS SS 


; FVTC.INI 
i 


sTESSCSAS SAAR AIASATT SASS UVSASAAS AS SEAS TCAASAAASASSAASS ANGIE SSOSASSAASAAASSEESSESSE SSSA CASBOAGS 


-SBTTL INITIALIZE SECTION 


soe 


§ SSSASEASHSHSEEEEASEASELASESESESEESEEAEAEDASEEEEEEEEAEEEEEEEEESEEESEEEEEEEEEEEEE 


34 THIS SECTION CONTAINS THE CODE WHICH IS PERFORMED AT THE BEGINNING OF 
3¢ EACH PASS OR AFTER A CONTINUE COMMAND. 
34 THIS CODE PERFORMS THE FOLLOWING ACTIONS: 
34 
3¢ oath aaa. INFORMATION HELD IN THE HARDWARE P-TABLE INTO THE GLOBAL 
34 
34 
BSSSHSSSSSSHASHEHSESEEESESEEEEEEEESEEESEHASESDEESEEESEEAEEESESAEEEEESD Ee EEEEEOEEEEEEEEEEE 
g°° 
BGNINIT 
LSINIT:: 
sSEE IF PROGRAM JUST STARTED, BR IF YES 
READEF #€F .START 
MOV @EF . START RO 
TRAP CSREFG 
BCOMPLETE NEWSTA 
ecs NEWSTA 
sSEE IF PROGRAM JUST RESTARTED, BR IF YES 
READEF O€F .RESTART 
IV @EF .RESTART RO 
TRAP CSREFG 
BCOMPLETE NEWRES 
BCS NEWRES 
3sSEE IF THIS IS A NEW PASS, BR IF YES 
READEF #€F .NEW 
MOV @€F .NEW,RO 
TRAP CSREFG 
BCOMPLETE NEWPAS 
BCS NEWPAS 
sSEE IF PROGRAM WAS JUST CONTINUED 
READEF 9@€F .CONTINUE 
MOV @€F .CONTINUE ,RO 
TRAP CSREFG 
BNCOMPLETE GETPRM 
Bcc GETPRM 
JMP ENOIT 
NEWSTA: 
BRESET sRESET THE BUS TO PREVENT BLOOM, INTERRUPTS. 
TRAP CSRESET 
a¢ 
3 SET UP FOR LINE TIME CLOCK INTERRUPTS. 
i- 
CLOCK L,R1 sGET THE CLOCK PARAMETERS. 
MOV #'L,RO 
TRAP CsCLCK 
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INITIALIZE SECTION 


027742 


012767 


152320 
152316 
152314 
152312 
152306 000062 
152306 


152276 


000024 


147720 
027476 


152170 
147710 


152160 


147654 


166020 


152104 
147624 


E15 
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»MSTICK 
CLKVEC, @CLKINT ,PRIO6 


MOV RO,R1 
sSTORE CLOCK CSR ADDRESS. 
sSTORE CLOCK BUS REQ INT LEVEL. 
sSTORE CLOCK INTERRUPT VECTOR. 
sSTORE CLOCK FREQUENCY. 
sTEST FOR SOHZ LINE FREQUENCY. 
sBRANCH IF CLOCK IS NOT SOHZ. 
sINDICATE 20MS PER CLOCK TICK. 


sINDICATE 17 MS PER CLOCK TICK. 

sINITIALIZE CLOCK INTERRUPT VECTOR. 
MOV PRIO6, -( SP) 
MOV @CLKINT, -(SP) 
MOV CLKVeEC, -(SP) 
MOV @3,-C(SP) 

Cs$SVEC 

ADO #10,SP 

sINITIALIZE THE BREAK COUNT 

s TO CAUSE A BREAK 

s EVERY 2 SECONDS. 

sALLOW CLOCK INTERRUPTS DISABLE OTHERS. 
MOV #PRIOS ,RO 
TRAP C$SPRI 


3¢ 
s ENABLE THE LINE TIME CLOCK (LTC) CHECKING TO MAKE SURE THAT THE CSR 
3 FIRST SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR: 


sSAVE THE EXISTING 004 TRAP VECTOR. 
sSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 


CHECKING FOR 004 TRAP IN CASE CSR IS NOT THERE. 


sCLEAR THE 004 TRAP FLAG. 

sSET UP TO SET BIT6 OF THE LTC CSR. 

sSET UP WORD1 AS THE CKTRAP MOVE SOURCE. 

+SET UP LTC CSR AS DESTINATION FOR CKTRAP MOVE. 
CHECK FOR TRAP. 


sMOVE AND 

iRESTORE THE NORMAL 004 TRAP VECTOR. 

sIF NO TRAP, LTC IS THERE SO CONTINUE. 

sCLEAR LTC FREQUENCY WORD TO INDICATE NO LS 
sBYPASS THE FOLLOWING CALIBRATION PROCEDURES 


s¢ 
s CALIBRATE THE DELAY ROUTINE MILLI-SECOND DELAY COUNT VALUE. 


PRESENT ON THIS MACHINE. 


sSAVE THE EXISTING 004 TRAP VECTOR. 

sSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 
sCLEAR THE 004 TRAP FLAG. 

sPREPARE TO CLEAR THE MEM MGT SRO REGISTER. 
iSELECT CLEARED WORD AS CKTRAP RIN 


MOV CR1)+,CLKCSR 
MOV (R1)+,CLKBRL 
MOV CR1)+,CLKVEC 
MOV (R1)+,CLKHRZ 
CMP CLKHRZ,@50. 
BNE 2s 
MOV hy . MSTICK 
BR 
2s: MOV e17. 
4%: SETVEC 
MOV CLKHRZ,RO 
ASL RO 
MOV RO,BCOUNT 
SETPRI @PRIOS 
s IS ACCESSABLE. 
3 - 
MOV 4, TP4VEC 
MOV @TP4RIN,4 
3° 
3 ENABLE LTC 
3 a 
CLR TP4FLG 
MOV @BIT6,WORD1 
MOV @W0RD1 ,RO 
MOV CLKCSR,R1 
JSR PC ,CKTRAP 
MOV TP4VEC ,4 
ecs 6% 
CLR CLKHRZ 
BR 8% 
3 — 
6%: JSR PC ,.CALMSL 
s¢ 
3s CHECK FOR MEMMORY MANAGEMENT 
' IF MEM MGT IS PRESENT, OISABLE IT. 
8s : MOV 4, TP4VEC 
MOV @TP4RTN,4 
CLR TP4FLG 
CLR WORD1 
MOV @WORD1 ,RO 
MOV MMSRO,R1 
CLR MMPRES 


SOURCE. 
sSELECT MEM MGT SRO REGISTER AS DESTINATION. 
s INDICATE NO MEM MGT PRESENT IN CASE IT ISN'T. 
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111167 


016701 


ran 
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SEQ 187 


151772 


177777 


151760 
151752 


151702 
151676 


151666 


151617 


151616 


000007 
002202 


147562 
152066 


151720 


151510 


CLR MMENAB sINDICATE MEM MGT IS NOT ENABLED. 
JSR PC ,CKTRAP sCLEAR THE MEM MCT SRO REG AND CHECK FOR TRAP. 
MOV TP4VEC 4 sRESTORE THE NORMAL 004 TRAP VECTOR. 
BCC 10$ sSKIP INDICATING MEM MGT PRESENT IF IT ISN’T. 
MOV @1,MMPRES S INDICATE THAT MEM MGT IS PRESENT. 
10%: CLR PASCNT sCLR COUNTER USED IN REPORTING ROM VERSION @. 
JMP NEWPAS sSKIP AROUND THE BUS RESET, IT’S BEEN DONE. 
NEWRES: BRESET sRESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 
; TRAP CSRESET 
CLR PASCNT 3(LR COUNTER USED IN REPORTING ROM VERSION ¢@. 
NEWPAS: 
MOV @-1,UNITN sRESET LOGICAL DEVICE TO -1 


3° 
s INCREMENT THE 
s THIS COUNTER 


PASS COUNTER, CORRECT FOR ANY OVERFLOW. 
IS USED IN THE ROM VERSION TEST. 


INC _ PASCNT sINCREMENT THE PASS COUNTER. 
BNE GETPRM ;BRANCH IF WE HAVE NOT YET! OVERFLOWED. 
DEC - PASCNT SET PASS COUNT TO 177777 OCTAL. 
ke GET THE HARDWARE PARAMETERS FOR THIS UNIT. 
" INC UNITN sINCREMENT LOGICAL DEVICE NUMBER 
CMP UNITN,L$UNIT § ;SEE IF MAXIMUM UNIT NO. EXCEEDED 
BGE NEWPAS ;8R IF YES 
GPHARD UNITN,R1 ;GET P-TABLE POINTER INTO Ri 
UNITN, RO 
TRAP ss «C$ 
MOV RO.R1 
BCOMPLETE 308 :BR IF DEVICE AVAILABLE al “te 
BR GETPRM ;SKIP THIS DEVICE 


3eeeesseeses HARDWARE PARAMETER MOVING CODE sesecesecccceces 


30%: MOV CR1)+,CSRA sSTORE DHU-11 CSR ADDRESS IN DEV.REG.ADDRESS TABLE 
MOV CR1)+,R2 3sGET THE RX INTERRUPT VECTOR ADORESS. 
MOV R2,RXVECA sSTORE RX INT VECTOR ADORESS. 
ADD eR2 sCALCULATE TX INTERRUPT VECTOR ADDRESS. 
MOV R2,TXVECA sSTORE TX INT VECTOR ADDRESS. 
MOV CR1)+,ACTLNS sSTORE OHU-11 ACTIVE LINE BIT MAP 
MOVB CR1)+,LOPBCK sSTORE DHU-11 LOOPBACK MODE 
MOVB CR1),BRLEVL sSTORE DHU-11 INTERUPT BUS REQUEST LEVEL 
3° 
$ CALCULTATE DEVICE REGISTER + samen PUT THEM IN THE 
s DEVICE REGISTER ADDRESS TABLE 
t- 
MOV CSRA,R1 sCOPY CSR ADDRESS 
INC R1 ee ie CSR ADDRESS 
INC R1 3 COPY B 
MOV @7,R3 sSET UP REGISTER COUNT 
MOV @RBUFA,R2 }GET LOCATION WHERE RBUF ADDRESS GOES IN TABLE 
128; MOV R1,CR2)¢ sSTORE REGISTER ADDRESS IN TABLE 
INC R1 s INCREMENT REGISTER ADDRESS 





Gi5 
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INITIALIZE SECTION 


7175 
7176 


020001 


002512 
002712 
152064 


000340 


151522 


SEQ 188 
INC R1 ; BY 2,FOR THE NEXT DEVICE REGISTER. 
DEC R3 sOECREMENT REGISTER COUNT 
BNE 12$ 3LOOP IF NOT DONE . 
3¢ 
3; INITIALISE THE BMP CODE QUEUE. 
§= 
MOV @BMPCGQB ,RO sGET THE START ADORESS OF THE QUEUE. 
MOV @BMPCQE ,R1 sGET THE END ADDRESS OF THE QUEUE. 
MOV RO,BMPCQP sSET THE POINTER TO THE START OF THE QUEUE. 
14%: CLR CRO)+ sCLEAR OUT THE CONTENTS OF THE QUEUE. 
CMP RO,R1 sCHECK IF END OF QUEUE HAS BEEN REACHED. 
BLO 14% sLOOP IF NOT ALL DONE. 
; REPORT THE UNIT NUMBER IF THE SOFTWARE P-TABLE QUESTION WAS ANSWERED YES, 
: AND THE MAXIMUM UNIT NUMBER IS GREATER THAN 1. 
BIT BIT4,OPTION sCHECK IF THE QUESTION WAS ANSWERED YES. 
BEQ 16% sSKIP REPORTING UNIT NUMBER IF IT IS DISABLED. 
CMP LSUNIT, #1 sCHECK MAXIMUM NUMBER OF UNITS SELECTED. 
BLE 16% 300 NOT REPORT UNIT NUMBER IF MAX NUMBER < 1. 
PRINTF @MFUNIT,UNITN sREPORT UNIT NUMBER. 
MOV UNITN, -CSP) 
MOV or T,-CSP) 
MOV #2,-C 
MOV SP RO 
TRAP CSPNTF 
ADO SP 
16%: 
ENDIT: 
. 4 
: SET THE PROCESSOR PRIORITY TO DISABLE ALL INTERRUPTS. 
ge 
SETPRI OPRIO7T sSET PROCESSOR PRIORITY TO 7. 
MOV @PRIO7,RO 
TRAP CSSPRI 
ENDINIT 
L10020: 
TRAP CSINIT 
TNUM == 0 sINITIALIZE THE ASSEMBLER TEST NUMBER VARIABLE. 


——— 
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INITIALIZE SECTION 


7210 j, SHAGCSGCSAGSMSSLSAEMGAGCADG SAMS GAGKASLGSAAAS SAN HKASSTS CH GSCSOSSEATHSCSHS CASS AL MS HAAKSBN KSA SSS 
7211 3 
7212 3 FVTA.ATO 
7213 3 
7214 _ BECCA SSSLSSSSAASGSSSASAA CA AS SHAASSAAHA ASUS SUCGLALS AMSSSSSLSASAGS CSRS NAIAAA SACHA ADSSSHSS 
7216 
7217 
7218 -SBTTL AUTODROP SECTION 
7219 
7220 
7221 ee 
7222 ; THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF 
7223 3; THE “ADR” FLAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO 
7224 ; SEE IF THEY WILL RESPOND. THOSE THAT DON’T ARE IMMEDIATELY 
7225 3: DROPPED FROM TESTING. 
7226 gee 
7227 
7228 030506 BGNAUTO 

030506 LSAUTO:: 
7229 
7236 
7237 030506 ENDAUTO 

L10021: 


030506 
030506 104461 TRAP CSAUTO 
é 


AUTODROP SECTION 


7239 
7240 
7241 
7242 
7243 


030510 


005767 151504 
001401 


104433 


104432 
000002 


104412 


-SBTTL CLEANUP CODING SECTION 


Ii5 
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zee 
s THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED 
: AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 


gee 
BGNCLN 


TST CTRLCF 
BEQ 2s 
BRESET 


2s: 
EXIT CLN 


- EVEN 
ENOCLN 


LSCLEAN: : 


sDIO WE GET HERE BY CTRL-C FROM TEST? 

sCTRL-C FROM TEST? NO, SKIP BUS RESET. 

sYES, CLR ANY DMAS OR OUTSTANDING INTERRUPTS. 
TRAP CSRESET 


TRAP CsExIT 
-WORD L10022-. 


L1002e: 
TRAP CSCLEAN 





J15 
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CLEANUP 


CODING SECTION 


030526 
030526 


030571 117 
030574 105 
030577 106 


SEQ 191 


{CHASSIS CGSAKSA SAMA SHS SAA SCA GSA LILSR MSSCCSGSMGISKATKSG GS SAPO GGSASASAALAGAS STACI ASSOSS SASS 
4 


3 FVTA.ORP 
3 
, SACSSASASASA GRASS SAAT ASASTAA LSS SHSCEASSLSGSS BHBAASASSAULACAASESKAKLESAE SLSSBEASASCAEALGES 
-SBTTL ODROP UNIT SECTION 
gee 
; THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
: TO NO LONGER BE TESTED. 
gs? 
BGNOU 
L$DU:: 
3 
3 INSERT DROP CODE HERE. THIS CODE WILL BE EXECUTED AFTER 
3 A “DROP” COMMAND OR A "DODU” MACRO EXECUTION. THE 
3 OF THIS CODE IS TO DO ANY NECESSARY HOUSEKEEPING AFTER A 
3 UNIT HAS BEEN DROPPED. THIS SECTION IS OPTIONAL. 
3 
PRINTF @OROP,RO sREPORT UNIT THAT HAS BEEN DROPPED. 
MOV RO, -CSP) 
MOV @OROP , -C SP) 
MOV @2,-CSP) 
MOV SP RO 
TRAP CSPNTF 
6 ,SP 
BR EDROP sBRANCH AROUND THE MESSAGE. 
DROP : -ASCIZ/#A UNITSD68A DROPPED FROM FURTHER TESTING.#N/ 
-EVEN 
EDROP ; 
EXIT Du 
-WORD J$JMP 
-WORD L10023-2-. 


Ki5 
OHU-11 FUNCTIONAL VERIFICATION MACRO M1200 12-DEC-83 16:16 PAGE 127-1 
DROP UNIT SECTION 
7322 coeese ENODDU 


30634 L10023: 
030634 104453 


TRAP 


Cs0u 


SEQ 192 


Lis 
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QROP UNIT SECTION 


030636 
030636 


030636 000167 
000000 


;SSLSCHKSGSSACTGAAKKHASSSSTSS GK SASAG SS VSS AAMAS GESGKSSHKKAA SK SMASH T SATS S SOR 
‘ 

3 FVTA.ADD 

3 

ERASE SCOSCGLEMAKS GS SGHGGA AGA GGK AGHA S KOGA CARAS AAAS ASAT LASS SEAAAKS STAKES we 


-SBTTL ADD UNIT SECTION 


soe 

s THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 
s TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
s TO THE TEST CYCLE. 

gee 


BGNAU 
LSAU:: 
 Kisstiddaisdesstdtddsuiistddddaedddse sedate Mee KARMA TAA MMA AEA K KS 
3 INSERT ADD CODE HERE. THIS CODE WILL BE EXECUTED AFTER 
3 AN “ADD” COMMAND. THE PURPOSE OF THIS CODE IS TO DO ANY 
3 HOUSEKEEPING THAT MAY BE NECESSARY AFTER A UNIT HAS BEEN ADDED. 
3 THIS SECTION IS OPTIONAL. 
, SAsiaitsccsas Lees AA AKAN SKN AS AAS SARA SAAN SAAS RASA AKAN 
EXIT AU 
. WORD J$ UMP 
. WORD L10024-2-. 
- EVEN 
ENDAU 
L10024: 


TRAP CsAuU 


M15 
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031030 


000001 
012767 
012767 
012767 
012767 
012767 


016767 
012767 
005005 


010100 
012701 


000001 
177777 
000145 
010041 
013572 


147076 
027476 


151254 
031116 
166414 


100001 
000017 


151222 
166366 


100002 


000010 
151176 
031114 
031116 
166330 


100001 
031114 


000146 


000110 


-SBTTL HARDWARE TEST - ADRA - 

++ 
 adenasnndnnentedsbennebeseeenensedeenssnsenneesensnenenneendboeamnnnessonenes 
i* - REGISTER ADDRESS TEST - 

3% 

3% THIS TEST VERIFIES THAT THE DEVICE REGISTERS WILL RESPOND TO THE PROPER 
i* UNIBUS HANDSHAKING SIGNALS WHEN ACCESSED. IF THE DHU11 DOES NOT RESPOND 
3% TO THE ACCESS ATTEMPTS CIF THE DOHU11 IS AT THE WRONG ADORESS, FOR EXAMPLE) 
34 THE 004 BUS TIME-OUT TRAP IS DETECTED BY THIS ROUTINE AND AN ERROR 

i* IS REPORTED. THIS TEST IS PERFORMED ON LINE O ONLY. 

3% 


{ SRHAEARERERARELEEERERAESEAESERAREREEEAEEREREEEEEAREREEAAEEESEEREESEERADEEEEEEEEESD 


3 --=- 
BGNTST 


TNUM == TNUM «+ 1 


#€M0103, ERRMSG 
#€RO101, ERRBLK 


oa 
; SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR: 


3 = 
MOV 
MOV 
CLR 


s¢ 
: HERE BEGINS THE LOOP TO TEST THE REGISTERS FOR A LINE 


4, TP4VEC 
#TP4RIN,4 
RS 


sSAVE THE EXISTING 004 TRAP VECTOR. 
004 TRAP VECTOR TO OUR SERVICE RTN ADR. 
sCLEAR THE ERROR FLAGS. 


:SET 


T1:: 
s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
sSET UP THE TEST NUMBER. (1) 
sINDICATE THAT WE ARE IN A TEST. 
RRNBR sSET THE TEST ERROR NUMBER IN THE TABLE. 
;SET UP THE TEST FAILURE MESSAGE IN THE TABLE. 
sSET-UP THE ERROR ROUTINE IN THE ERROR TABLE. 


3 FIRST TEST THE CSR AND SET THE IND.ADR.REG (I.A.R) FIELD. 


4$: BIC 


sSET UP CSR AS THE CKTRAP MOVE SOURCE. 
sSET UP DESTINATION LOCATION FOR CKTRAP MOVE. 
sMOVE AND TRAP. 


CHECK F' 


OR TR 
sIF NO TRAP, BYPASS ERROR. 
SET FATAL READ ERROR FLAGS. 


sCLEAR THE I.A.R FIELD OF THE CSR DATA. 
sUSE OLD DESTINATION FOR SOURCE OF CKTRAP MOVE. 
sSET UP CSR AS THE CKTRAP MOVE DESTINATION. 


sMOVE AND CHECK FOR TRAP. 
sIF NO TRAP, BYPASS ERROR. 
sSET FATAL WRITE ERROR FLAGS. 
sEXIT AND REPORT FATAL ERROR. 


; NOW, WE TEST EACH REGISTER FOR THIS LINE. 


sINIT REGISTER COUNTER TO 8. 
IZE THE REGISTER POINTER. 


s INITIAL 
sSET UP REGISTER AS THE SOURCE FOR CKTRAP MOVE. 
sSET UP LOCAL STORAGE AS THE DES FOR CKTRAP. 


sPERFORM THE MOVE, CHECK FOR TRAP. 


1IF NO TRAP, BYPASS lg SETTING OF ERROR FLAGS. 
SET FATAL READ ERROR FLAGS. 

sUSE OLD DEST AS SRC FOR CKTRAP MO 
sSET UP REGISTER AS THE DEST FOR CKTRAP MOVE. 


SEQ 194 


Nis 
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7414 031034 004767 166310 JSR PC,CKTRAP sPERFORM THE MOVE, CHECK FOR TRAP. 
7415 031040 103402 BCS 12$ ;IF NO TRAP, BYPASS THE SETTING OF ERROR FLAGS. 
7416 031042 052705 100002 BIS #100002 ,R5 ;SET FATAL WRITE ERROR FLAGS. 
7417 031046 005267 000042 12$: INC 50$ s INCREMENT THE REGISTER 
7418 031052 005267 000036 INC 50$ ; POINTER BY 2. 
7419 031056 005302 DEC R2 sCOUNT THE REGISTER. 
mane 031060 001351 BNE 8$ sLOOP TO TEST THE NEXT REGISTER ADDRESS. 
1 
7422 
7423 : * DONE CHECKING DEVICE REGISTER ADDRESSES. 
7424 ; REPORT ANY ERRORS AND EXIT. 
1 ‘ 
7427 031062 016767 151170 146714 40$: MOV TP4VEC,4 sRESTORE THE NORMAL 004 TRAP VECTOR. 
7428 031070 005705 TST RS ;CHECK THE ERROR FLAGS. 
Ling 34 031072 100012 BPL 60$ sEXIT ROUTINE IF NO ERRORS. 
3¢ 

bt ; REPORT “DEVICE REGISTER ACCESS TEST FAILED” 
7433 031074 ERROR 

031074 104460 TRAP CSERROR 
7434 
7435 
7436 031076 DODU UNITN ;DROP THIS UNIT FROM FUTHER TESTING. 

031076 016700 151074 MCV UNITN,RO 

031102 104451 TRAP C$D0DU 
7437 031104 005067 151110 CLR CTRLCF s INDICATE NO CTRL-C tags FROM TEST. 
7438 031110 DOCLN sABORT THIS SUB PASS 

031110 104444 TRAP C$OCLN 
mae 031112 000402 BR 60$ 3 
7441 34eheeeeeeeeeeses LOCAL STORAGE. £4644644606666604666064664666064606040004040684 
7442 031114 000000 50$: -WORD O sSTORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 
7443 031116 000000 S2$: “WORD 0 sSTORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 
eons $OO4O6060000460400088 END 6446446664466468046646460466644606460646060460460004640404884 
7446 031120 005067 151074 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
7447 031124 ENDTST 

031124 L10025: 

031124 104401 TRAP CsETST 


L 


Bi6 
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7449 .SBTTL HAROWARE TEST - KBECHO - 

7450 THF SHOSSEHOSEAEESASEEASEOEEEEEEAEEEEEEESEEAEEEEEEEEEODEEEEEEEEEEEEEEESESEEEEOHS 

7451 i¢ - KEYBOARD ECHO TEST - 

7452 3° THIS IS A TEST WHICH PUTS UARTS FOR THE ACTIVE LINES INTO REMOTE 

7453 :¢ LOOPBACK MODE. THE ACTIVE LINE UARTS ARE SET UP WITH A BAUDRATE 

7454 :¢ WHICH IS SPECIFIED BY THE OPERATOR. THIS TEST SETS UP THE LINES 

7455S i* FOR: 1 STOP BIT, NO PARITY AND 8 BITS/CHARACTER. 

rant :4 THE TEST EXECUTES INDEFINITELY UNTIL TERMINATED BY THE OPERATOR. 

4 ; 3¢ 

7458 :¢ THIS TEST CAN BE USED FOR LOOPING BACK TERMINAL KEYBOARD INPUT ONTO 

7459 :¢ A TERMINAL CRT OR IT CAN BE USED AS A GENERAL LOOPBACK METHOD FOR 

7460 i¢ TESTING COMMUNICATIONS LINKS TO THE DUT FROM THE OTHER END OF THE 

7461 i* CHANNEL. OTR AND RTS ARE SET ON THE SELECTED LINES DURING THIS 

Lees | i¢ TEST TO ALLOW THE TESTING OF MODEM LINKS. 

6 34 

7464 F—— SHESOHSEHSHEHSEESEEHOEHSEEEEEEESEESEHESSEEESESE SESS NEEEHESEREEESEESEEEEEEESEEEESD 

7465 031126 BGNTST 

031126 $3 
7466 031126 SETPRI @PRIOS sALLOW LTC INTERRUPTS. 

031126 012700 000240 Ho @PRIOS RO 

031132 104441 TRAP CSSPRI 
7467 000002 TNUM == TNUM + 1 s INCREMENT THE pat Og TIME TEST COUNTER. 

Lee 031134 012767 000002 151116 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER (94) 
3° 
7470 ; VERIFY THAT THE TEST SHOULD BE PERFORMED. MUST HAVE THE FOLLOWING: 
7471 : KEYBOARD ECHO LOOPBACK SELECTED. 
aa ; MANUAL INTERVENTION ALLOWED. 
Te 
7474 031142 126727 151026 000005 CMPB = LOPBCK , 05 sTEST THE LOOPBACK TYPE INDICATOR. 
7475 031150 001402 BEQ 2s sKBD ECHO LPBCK SELECTED? YES, CONTINUE TEST. 
7476 031152 EXIT TST sNO, ABORT THE TEST. 

031152 104432 TRAP CSExIT 

031154 000212 -WORD  L10026-. 
7477 031156 2s: MANUAL sCHECK FOR MANUAL INTERVENTION ALLOWED. 

031156 104450 TRAP CSMANI 
7478 031160 BCOMPLETE 4% sMANUAL INTERVENTION ALLOWED? YES. DO lear 4 

031160 103402 acs 
7479 031162 EXIT TST sNO, ABORT THE TEST. 

031162 104432 TRAP CsExIT 
—_ 031164 000202 -WORD L10026-. 
7481 031166 012767 177777 151024 4$: MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

7482 031174 012767 000001 154112 MOV #1, ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
7483 031202 012767 022271 154106 MOV #9401.,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
7484 031210 012767 013065 154102 MOV @EM9401,ERRMSG ;,SET ERROR MESSAGE ADDRESS IN ERRTBL. 
easy 031216 005067 151256 CLR ERSMRF sINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS. 
7487 ; "RESET THE DUT TO A KNOWN STATE, REMOVE THE STATUS CODES FROM THE FIFO. 
7488 s CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
see s THIS SUBROUTINE REPORTS ERROR >>>>> 9401 <<ccc, 

i- 
7491 031222 004767 166202 JSR PC, CLNRST sRESET THE DHU-11, REPORT ANY ERRORS FOUND. 
7492 031226 103402 BCS .*6 sSKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
eee 031230 000167 000120 JMP 60% sRESET FAILURE, ABORT THIS TEST. 

3° 
7495 s PRINT THE TEST NAME, 
74% t- 
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HARDWARE TEST 


7497 


031234 
031234 
031240 
031244 
031250 
031252 
031254 


031312 
031316 


031322 
031326 


012746 
012746 
012746 
010600 
104417 
062706 


013065 
005453 
000002 


000006 


167134 


000377 
000030 


150654 
175666 


011304 
175626 


000001 150670 


150632 


Sd 


C16 


PRINTF @€FOS03, 0EM9401 


SET UP THE DUT UARTS WITH THE PROPER LINE PARAMETERS. 


GET THE DESIRED BAUDRATE FROM THE OPERATOR. 
CALCULATE PROPER DUT LPS CONTENTS. 

SET UP THE DUT LPR REGISTERS. 

GET THE PROPER DUT LNCTRL REGISTER CONTENTS. 
SET UP THE DUT LNCTRL REGISTERS. 


PC,.GETBOR 
R1,RO0 


ACTLNS,RS 
PC, WTWLPR 


#11304 ,RO 
PC ,.WTWENC 


sGET DUPLICATE COPIES OF BAUDRATE CODE 
s IN THE UPPER BYTE OF THE NEW 
s LPR CONTENTS. 


#EM9401 .~ 
EF 0503, 


;SET UP 1 STOP BIT, NO PARITY, 8 BITS/CHAR 


s IN THE LPR CONTENTS. 
sGET THE ACTIVE LINES BIT MAP 


sSET UP THE DUT LPR REGISTERS FOR ACTIVE LINES. 


sSET UP DTR, RTS, REMOTE LPBK, 


AND 8X ENABLE. 


sSET UP THE DUT LNCTRL REGS FOR ACTIVE LINES. 


3¢ 
s WAIT FOR THE OPERATOR TO TERMINATE THE TEST. 
PROMPT “TYPE <CR> TO TERMINATE THE TEST:” 


MOV 1, GMANWD 
GMANIL TERMSC. GMANWO 1, YES 


sSET UP DEFAULT ANSWER TO YES. 


3¢ 
s WE GOT A RESPONSE FROM THE OPERATOR, SO TERMINATE THE TEST. 
SETPRI @PRIO7 


t- 
60%: 


ENOTST 


CLR 


CTRLCF 


sDISABLE ALL INTERRUPTS. 
MOV 


TRAP 
sINOICATE THAT WE ARE NOT WITHIN A TEST. 


L10026: . 


@PRIO7,RO 
CsSPRI 


CsETST 


¢ 
-¢ 


SP 
SP 


) 
) 


D16 
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7585 


031370 
031370 
031370 
031370 
031374 


031376 


031404 
031412 
031414 
031414 
031416 
031420 
031420 
031422 
031422 
031424 
031424 
031426 


031430 


012700 000240 
104441 


000003 
012767 000003 150654 


126727 150564 000004 
001402 


104432 
000702 


104450 
103402 


104432 
000672 


012767 177777 150562 


-SBTTL HARDWARE TEST - MOOLPB - 
FOF AHEAASHEAKESEEAASASESEEADEEEEEEEESEEASEAESEEEEEAEEAEEEEEEAEREEEREEEEESEEEES 
i* MODEM LOOPBACK TEST - 
34 THIS TEST IS USED TO MOVE DATA THROUGH A MODEM WHICH IS CONNECTED TO 
3¢ ONE OF THE DEVICE SERIAL PORTS. THIS TEST IS RUN ONLY IF MODEM 
34 yh oom IS SPECIFIED. THIS TEST UTILIZES THE FOLLOWING OPERATOR 
34 8 
34 MODEM BAUDRATE IN BPS: (D) 1200 ? 
34 TYPE <CR> WHEN MODEM LINK ESTABLISHED: (L) Y ? 
3¢ MODEM STATUS SIGNAL REPORT: 
34 LINE @N: DSR=N, RI*°N, DCD©N, CTS=N 
3¢ REPEATED FOR EACH ACTIVE LINE 
34 NUMBER OF 256 BYTE DATA PATTERNS TO SEND ON EACH SELECTED LINE 
36 (1-255, O=SEND UNTIL tC): (0) 1 ? 
3¢ PRINT MODEM STATUS SIGNAL REPORT AFTER EACH PATTERN: (L) Y ? 
34 
34 AT THE COMPLETION OF SENDING THE SPECIFIED NUMBER OF DATA PATTERNS THE 
3% TEST ISSUES THE FOLLOWING PROMPT: 
34 EXIT THE TEST (N = LOOP BACK TO SEND MORE DATA): (L) Y ? 
34 
34 EXTENDED ERROR REPORTING IS ALLOWED, A REPORT IS PRINTED AT THE EPD 
34 EACH DATA PATTERN WITH THE FOLLOWING FORMAT: 
3% MODEM LOOPBACK TEST STATUS REPORT: PATTERN @NNN (D) COMPLETED. 
34 
3¢ THIS TEST IS PERFORMED USING 8 BITS PER CHARACTER, 1 STOP BIT, AND NO 
34 PARITY. THIS TEST DOES NOT SUPPORT SPLIT SPEED. ALL SELECTED LINES 
34 ARE TESTED AT THE SELECTED BAUDRATE. AN ERROR SUMMARY IS REPORTED AT 
34 THE END OF THE TEST IF ANY LINES HAVE EXCEEDED THE NUMBER OF INDIVIDUAL 
34 DATA ERRORS TO REPORT AS SELECTED IN THE SOFTWARE P-TABLE DIALOGUE 
3% 
8 -- 666668666 6666666666666606660666666606666466666666606606060666606466646600866660664 
BGNTST 
3:: 
SETPRI @PRIOS sALLOW LTC INTERRUPTS. 
he @PRIOS RO 
TRAP CsSPRI 
TNUM == TNUM «+ 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM 3SET UP THE TEST NUMBER. (89) 


Sd 
. VERIFY THAT THE TEST SHOULD BE PERFORMED. MUST HAVE THE FOLLOWING: 
H MODEM LOOPBACK SELECTED. 


i MANUAL INTERVENTION ALLOWED. 
i- 
CMPB = LOPBCK , 04 sTEST THE LOOPBACK TYPE INDICATOR 
BEQ 2s sMODEM LOOPBACK SELECTED? YES, CONTINUE TEST. 
EXIT TsT sNO, ABORT THE TEST. 
TRAP CsExIT 
-WORD 110027-. 
2s; MANUAL sCHECK FOR MANUAL INTERVENTION ALLOWED. 
TRAP C$MANI 
BCOMPLETE ag sMANUAL INTERVENTION ALLOWED? “a ar 
EXIT TsT s3NO, ABORT THE TEST. 


“ TRAP CsExIT 
-WORD 110027-. 


4%; MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 


SEQ 


198 


E16 
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7586 031436 012767 000001 153650 MOV @1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
7587 031444 012767 021305 153644 MOV #8901.,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
7588 031452 012767 011211 153640 MOV @EM8901,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
7388 031460 005067 151014 CLR ERSMRF sINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS. 
7591 3¢ 
7592 3; RESET THE DUT TO A KNOWN STATE, REMOVE THE STATUS CODES FROM THE FIFO. 
7593 ; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
7388 ; THIS SUBROUTINE REPORTS ERROR >>>>> 8901 <<ccc, 
g= 
7596 031464 004767 165740 JSR PC,CLNRST sRESET THE DHU-11, REPORT ANY ERRORS FOUND. 
7597 031470 103402 BCS . +6 sSKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
7396 031472 000167 000610 JMP 60% sRESET FAILURE, ABORT THIS TEST. 
7600 3° 
a : SET UP FOR TRANSMIT AND RECEIVE INTERRUPTS. 
7603 031476 SETPRI @PRIO7 sDISABLE ALL INTERRUPTS. 
031476 012700 000340 MOV @PRIO7,RO 
031502 104441 TRAP C$SPRI 
7604 031504 SETVEC TXVECA, @TXDMA, OPRIO6 ;SELECT DMA TX INT SERVICE RTN. 
031504 012746 000300 MOV @PRIO6, -( SP) 
031510 012746 027520 MOV @TXDMA, -(SP) 
031514 016746 150450 MOV TXVECA, -(SP) 
031520 012746 000003 MOV #3, -C 
031524 104437 TRAP CsSVEC 
031526 062706 000010 ADD #10,SP 
7605 031532 SETVEC RXVECA,ORXCHRS,OPRIO6 ;SELECT RX INT SERVICE RIN. 
031532 012746 MOV #PRIO6, -( SP) 
031536 012746 027310 MOV @RXCHRS, -( SP) 
031542 016746 150420 MOV RXVECA, -(SP) 
031546 012746 000003 MOV @3,-<SP> 
031552 104437 TRAP CsSVEC 
031554 062706 000010 ADD #10,SP 
7606 031560 SETPRI @PRIO4 s;ALLOW INTERRUPTS. 
031560 012700 000200 MOV @PRIO4 RO 
= 031564 104441 TRAP CsSPRI 
age ; "CLEAR THE CUMULATIVE ERROR COUNTERS (ONE FOR EACH LINE). 
g° 
7610 031566 012700 003302 MOV @ERCNTB,RO 
Toit 031572 004767 165654 JSR PC,CLRi6wW sCLEAR THE RX ERROR COUNTERS TABLE. 
3¢ 
7613 3 PRINT THE THE TEST NAME. 
t- 
7615 031576 PRINTF #€F0503, 0EM8901 
031576 012746 011211 MOV @€M8901, -(SP) 
031602 012746 005453 MOV #€F 0503, -(SP) 
031606 012746 000002 MOV #2, -(SP) 
031612 010600 MOV SP RO 
031614 104417 TRAP CSPNTF 
— 031616 062706 000006 ADD #6 .SP 
7617 : * PREPARE TO CALL THE SET UP ROUTINE. 
7618 : GET THE DESIRED BAUDRATE FROM THE OPERATOR. 
7619 CALCULATE PROPER DUT LPR CONTENTS. 
7620 ; CALCULATE THE PROPER RX TIME-OUT VALUE FOR THIS SPEED. 


HARDWARE TEST 


F 16 
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031764 


004767 


004767 


166572 


000377 
000030 


166750 
177400 150344 


003602 


000020 


000001 150260 


167326 


; SET UP THE BIT MAP OF UNUSED TX/RX BITS. 


JSR PC ,GETBOR 

MOV R1,RO 

ASL R1 

ASL R1 

ASL R1 sGET DUPLICATE COPIES OF Ay te CODE 

ASL R1 s IN THE UPPER BYTE OF THE NE 

BIS RO,R1 s LPR CONTENTS. 

SWAB R1 

BIC @377,R1 sSET UP 1 STOP BIT, NO PARITY, 8 BITS/CHAR 

BIS #30,R1 s IN THE LPR CONTENTS. 

JSR PC,GETTIM sGET TIME-OUT BASED ON MINIMUM BAUDRATE IN USE. 

MOV #177400, IBM sFORM BIT MAP OF UNUSED TX/RX BITS. 
3¢ 
; SET UP A 256 BYTE DATA PATTERN. 
i- 

‘CLR R3 sPREPARE TO START DATA PATTERN AT 255. 

a oe sGET THE BASE OF THE DATA PATTERN BUFFER. 
6%: OECB = RS sGET THE NEXT BYTE OF THE DATA PATTERN. 

MOVB R3,(R4)+ sWRITE A BYTE OF THE DATA PATTERN. 

TSTB RS sCHECK FOR DONE oy ie DATA PATTERN. 

BNE 6% sDATA PATTERN DONE? NO, LOOP TO DO NEXT BYTE. 

sYES, WRITE 32 BYTE = REGION. 

MOV R2,R5 sPREPARE SOURCE POINTER 

MOV #16. ,RO sPREPARE LOOP COUNTER. 
8s: MOV CRS)+,CR4)+ SWRITE 2 BYTES OF THE OVERFLOW PATTERN. 

DEC RO sCOUNT THESE 2 BYTES. 

BNE 8s 116 WORDS WRITTEN? NO, LOOP TO WRITE ANOTHER. 

sYES, COMPLETE DATA PATTERN IS DONE. 

MOV #256. ,.R3 iSET DATA PATTERN LENGTH TO 256. 
3¢ 
s SET THE DUT RTS AND OTR BITS FOR THE ACTIVE LINES. 
| eg 

MOV #11000,RO sSPECIFY TO SET RTS AND DTR. 

MOV ACTLNS RS sSPECIFY ACTIVE LINES. 

JSR PC .WTWLNC sSET OUT RTS AND OTR ON ALL ACTIVE LINES. 


s¢ 
s WAIT FOR THE OPERATOR TO ESTABLISH THE MODEM CONNECTION. 
s PROMPT “TYPE <CR> WHEN MODEM LINK ESTABLISHED: ” 


r MOV @1, GMANWD ;SET UP DEFAULT ANSWER TO YES. 
GMANIL EMULMSG,GMANWD,1, YES 


TRAP C$GMAN 


BR 10000$ 
-WORD GMANWD 
-WORD TSCODE 
-WORO EMLMSG 
-WORD 1 


10000$: 


3° 
s REPORT THE STATE OF THE MODEM STATUS SIGNALS. 
s SET DEFAULT OF PRINTING MODEM STATUS AFTER EVERY DATA PATTERN. 


$ - 
JSR PC ,MSSRPT 


EQ 200 
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aoe 031770 012767 000001 150246 MOV 41,PMSFLG 
3+ 
7673 ; ASK OPERATOR FOR THE NUMBER OF DATA PATTERNS TO SEND. 
7674 3 PROMPT: “NUMBER OF 256 BYTE DATA PATTERNS TO SEND ON EACH SELECTED LINE 
ahh 3 (1-255, O=SEND UNTIL tC): (0) 1 ?” 
676 3- 
7677 031776 012767 000001 150224 10%: MOV #1,GMANWD sSET DEFAULT NUMBER OF PATTERNS TO 1. 
7678 032004 GMANID NDPMSG,GMANWO,D,377,0,255, YES 
032004 104443 TRAP C$GMAN 
032006 000406 BR 10001$% 
032010 002230 «WORD GMANWO 
032012 0000 “WORD TSCODE 
032014 013316 -WORD NOPMSG 
032016 000377 - WORD 377 
032020 000000 - WORD TS$LOLIM 
032022 000255 . WORD TSHILIM 
032024 10001$: 
7679 032024 016704 150200 MOV GMANWD ,R4 
7680 032030 CLR RS sCLEAR THE DATA PATTERN COUNTER. 
ees 3 032032 005067 150166 CLR FERROR sCLEAR THE “AT LEAST ONE ERROR” FLAG 
3¢ 
7683 3 ASK IF MODEM STATUS SIGNALS SHOULD BE REPORTED AFTER EACH DATA PATTERN. 
7684 3 PROMPT: “PRINT MODEM STATUS SIGNAL REPORT AFTER EACH PATTERN: (L) Y ?” 
oor 3 USE LAST RESPONSE AS DEFAULT (DEFAULT OF YES THE FIRST TIME). 
ge 
7687 032036 GMANIL PMSMSG,PMSFLG,.1, YES 
032036 104443 TRAP C$GMAN 
032040 000404 BR 10002$ 
032042 002244 . WORD PMSFLG 
032044 000130 - WORD TSCODE 
032046 013444 - WORD 
032050 000001 - WORD 1 
032052 10002$% 
7688 
7689 ze 
7690 3s SET UP THE DUT AND TX/RX VARIABLES. 
7691 3 Ri - TX, RX LPR CONTENTS. 
7692 : R2 - START ADDRESS OF DATA PATTERN TO TX/RX. 
7693 - R3 - LENGTH OF DATA PATTERN. 
Lat = THE DATA, 
7696 032052 005205 i2s: INC RS sCOUNT THIS DATA PATTERN. 
oon 032054 004767 166746 JSR PC .MOOSUP sSET UP THE DUT AND TX/RX VARIABLES. 
7699 032060 004767 170656 JSR PC ,PUFIFO sPURGE THE DUT RECEIVE CHARACTER FIFO. 
ren 032064 103110 Bcc 60% sABORT THIS TEST IF FIFO WOULD NOT PURGE. 
7702 032066 004767 171134 JSR PC ,PURRXB sPURGE THE RX CHAR BUFFER IN MEMORY. 
7703 032072 004767 166610 JSR PC, INIDMA sSEND THE FIRST BATCH OF DATA PATTERNS. 
hae} 032076 012767 021306 153212 MOV 086902. ,ERRNBR sSET ERROR NUMBER TO 8905. 
t¢ 
ae s THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 8902 THRU 8907 <<<<<. 
g- 
ha 4 032104 004767 171152 JSR PC,ROCHRS sREAD AND VERIFY THE RX CHARACTERS. 
7710 032110 005767 150110 TST FERROR sHAS AN ERROR BEEN DETECTED ? 
7711 032114 001404 BEG 13% sBRANCH IF IT HASN'T. 


ee ee 


SEQ 201 


H16 


DHU-11 FUNCTIONAL VERIFICATION MACRO M1200 12-DEC-83 16:16 PAGE 131-4 SEG 202 
HARDWARE TEST - MODLPB - 
7712 032116 032767 000100 150036 BIT #BITO6,OPTION sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
Ak 032124 001430 BEQ 16% sBRANCH TO THE “EXIT TEST ?” QUESTION IF NOT. 
1 
rr 032126 012767 021314 153162 13%: MOV 8908. ,ERRNBR sSET ERROR NUMBER TO 8908. 
1 i¢ 
re ; THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 8908 THRU 8911 <<<«<<, 
1 t- 
7H 032134 004767 174200 JSR PC, TXRREP sREPORT FINAL ERRORS FROM RX/RX. 
t¢ 
7721 3: REPORT END OF DATA PATTERN IF ALLOWED. 
7722 3 “MODEM LOOPBACK TEST STATUS REPORT: PATTERN @NNN (D) COMPLETED. ” 
Ak 4 ; REPORT THE MODEM STATUS SIGNAL STATES IF REQUESTED. 
a a~ 
7725 032140 PRINTX @EDPFMT,RS 
032% 010546 MOV RS,-CSP) 
032142 012746 007733 : MOV @EDPFMT , -C SP) 
032146 012746 000002 MOV @2,-(SP) 
032152 010600 MOV SP ,RO 
032154 104415 TRAP CSPNTX 
032154 062706 000006 ADD #6,SP 
7726 032162 005767 150056 TST PMSFLG ;sCHECK THE “PRINT MODEM STATUS” FLAG. 
7727 032166 001402 BEQ 14% sPRINT MODEM STATUS? NO, SKIP PRINTING. 
ML 032170 004767 167122 JSR PC .MSSRPT sREPORT THE MODEM STATUS. 
3¢ 
orae : IF THERE ARE MORE DATA PATTERNS TO SEND, LOOP BACK TO SEND AGAIN. 
1 - 
7732 032174 005304 14%: DEC R4 sCOUNT THIS DATA PATTERN. 
7733 032176 001403 BEQ 16% sLAST DATA PAT SENT? YES, PROMPT FOR EXIT. 
7734 032200 100324 BPL 12s sNO, CONTINOUS SENDING? NO, SEND NEXT PAT. 
7735 032202 005204 INC RA sYES, RESTORE PATTERN COUNTER. 
AL. 032204 000722 BR 12% :GO TO SEND NEXT DATA PATTERN. 
3¢ 
7738 3; PROMPT FOR EXIT OF THE TEST OR SENDING OF MORE DATA PATTERNS. 
rece ; PROMPT: “EXIT THE TEST (N = LOOP BACK TO SEND MORE DATA): (L) Y ?” 
t- 
7741 032206 012767 000001 150014 163: MOV @1,GMANWOD ;SET DEFAULT ANSWER TO YES. 
7742 032214 GMANIL EXTMSG,GMANWD,1,YES 
032214 104443 TRAP C$GMAN 
032216 000404 BR 10003$% 
032220 002230 . WORD GMANWD 
032222 000130 . WORD TSCODE 
032224 013235 . WORD EXTMSG 
032226 000001 . WORD 1 
032230 10003$: 
7743 032230 026727 147774 000001 CMP GMANWD , #1 sCHECK OPERATOR RESPONSE. 
7744 032236 001257 BNE 10% sEXIT RESPONSE? NO, LOOP TO SEND MORE DATA. 
7745 sNO, EXIT ROUTINE. 
7746 s¢ 
7747 s ALL DONE. HAVE BEEN TOLD TO EXIT. 
7748 3 CLEAR DEVICE OTR AND RTS SIGNALS. 
7749 3 DISABLE INTERRUPTS. 
7750 Fy CLEAR THE INTERRUPT vECTORS. 
as 3 REPORT ANY NECESSARY ERROR SUMMARIES. 
t- 
7753 032240 005000 CLR RO sINDICATE TO CLEAR ALL LNCTRL BITS. 
7754 032242 012705 177777 MOV @MAPLNS ,RS sINDICATE TO CLEAR FOR ALL LINES. 
7755 032246 004767 174706 JSR PC ,WTWLNC sCLEAR ALL THE RTS AND OTR SIGNALS. 


Far 


OHU-11 FUNCTIONAL VERIFIC 


HARDWARE TEST 


7756 
7757 


032252 
32 


012700 
104441 


016700 
104436 


016700 
104436 


012767 
004767 


000340 
147704 
147674 
171618 


000340 
147700 


153014 


ATION MACRO M1200 12-DEC-83 
MODLPB - 


SETPRI 


CLRVEC 


CLRVEC 


I16 


16:16 PAGE i31-5 


oPRIO7 
TXVECA 


RXVECA 
#86912. ,ERRNBR 


PC ,REPSMR 
@PRIO7 


CTRLCF 


sDISABLE ALL INTERRUPTS. 
MOV 
TRAP 
sRETURN TX INT VECTOR TO UNUSED — 
Vv 


‘ TRAP 

sRETURN RX INT VECTOR TO UNUSED + 
Vv 

TRAP 


#PRIO7,RO 
Cs$SPRI 


TXVECA,RO 
CsCvec 


RXVECA,RO 
C$CVEC 


sSELECT NUMBER 8912 FOR THE NEXT ERROR REPORT. 


sREPORT ERROR SUMMARIES IF CALLED FOR. 
sDISABLE ALL INTERRUPTS. - 
Vv 


TRAP 
s INDICATE THAT WE ARE NOT WITHIN A TEST. 


L10027: 
TRAP 


@PRIO7,RO 
CsSPRI 


CsETST 


SEQ 203 


OHU-11 FUNCTIONAL VERIFICATION were M1200 12-DEC-83 16:16 PAGE 132 
HARDWARE TEST DMAADR 


SEQ 204 


DMA FROM A FULL 18 BIT OR 16 BIT ADDRESS. THE TEST RELIES ON FINDING A 
COMPLEMENTARY PAIR OF ADDRESSES BETWEEN THE TOP OF PHYSICAL MEMORY AND 


THIS MAY INVOLVE REMOVING PART OF THE DIAGNOSTIC RUNTIME SERVICES AND 
THEN RESTORING. THE NUMBER OF BITS THAT HAVE BEEN SUCCESSFULLY TESTED 


T4:: 
MOV @PRIOS,RO 
TRAP CSSPRI 
s INCREMENT THE ASSEMBLY TIME TEST COUNTER 


sINDICATE THAT WE ARE IN A TEST 
sSET ERROR TYPE AS a aah — ERROR TABLE 
NUMBER TO 44 


SAGE ADDRESS IN TABLE 
sSELECT THE CORRECT ERROR REPORTING ROUTINE 


sINDICATE FAILURE , IN CASE THE DUT FAILS 


REPORT ANY ERRORS 
sSKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
sEXIT THE TEST, FATAL ERROR WAS FOUND. 


sSAVE THE EXISTING 004 TRAP VECTOR 
sPOINT THE VECTOR AT OUR SERVICE ROUTINE. 


sAVOID SETTING THE DMA TEST ADDR FOR 


7767 .SBTTL HARDWARE TEST - DMAADR - 

7768 OF MERSEAASERAEAEREEASEREEEAEEEEEEEEREEERESOEEEESS EAEEAEEEEEEEEEREDEEESREEREEESE 

7769 3* DMA ADDRESSING TEST - 

he 3% THIS TEST VERIFIES , AS FAR AS POSSIBLE , THAT THE DUT CAN PERFORM A 

1 Hd 
7772 3% 
arr 3* THE START OF THE TOP OF THE DIAGNOSTIC PROGRAM . 
4 36 

7775 34 

bk 3% WILL BE PRINTED AT THE CONSOLE AT THE END OF THE TEST, IF REQUESTED. 
3* 

7778 34 

7779 S--— SRAREAAREESEAEEEEESEREEEEEEEEEEEEEEREREEEEEEEEEDEOEEOE4EE4KOO4O04646640646040044 

7780 032322 BGNTST 

re, 032322 

7782 032322 SETPRI #PRIOS sALLOW LTC INTERRUPTS 

032322 012700 000240 
032326 104441 

7783 

7784 000004 TNUM == TNUM ¢ 1 

7785 032330 012767 000004 147722 MOV @TNUM, TSTNUM 3SET UP THE TEST NUMBER 

7786 032336 012767 177777 147654 MOV @-1,CTRLCF 

7787 032344 012767 000001 152742 MOV #1,ERRTYP 

7788 032352 012767 010461 152736 MOV 4401. , ERRNBR sSET ERROR 

7789 032360 012767 010166 152732 MOV @EM4401,ERRMSG ;SET ERROR MES 

7reL 032366 012767 014124 152726 MOV #€RO503, ERRBLK 

7792 3¢ 

tone 3; CLEAR THE SUCCESS FLAG TO INDICATE TEST FAILURE IN CASE IT DOES 
To 

7795 

7796 032374 005067 001374 CLR sucss 

7797 

7798 3+ 

7799 3 RESET THE DUT TO A KNOWN STATE,REMOVE THE STATUS CODES FROM THE FIFO. 

pean : CLEAR TX AND RX INTERUPT ENABLE BITS IN THE CSR 

7802 , 

7803 032400 004767 165024 JSR PC,CLNRST sRESET THE OHU , 

7804 032404 103402 bcs +6 

7805S 032406 000167 001324 JMP 60% 

7806 

7807 3° 

oo s SET UP THE 004 TRAP VECTOR TO POINT TO OUR TRAP SERVICE ROUTINE. 
3t- 

7810 032412 016767 145366 147636 Mov 4, TP4VEC 

7811 032420 012767 027476 145356 MOV @TP4RIN,4 

7812 

7813 3¢ 

ba ; DETERMINE WHETHER MEMORY MANAGEMENT IS PRESENT 
ge 

7816 

7817 032426 005767 147666 TST MMPRES sIF MEM MGT IS PRESENT THEN 

7818 032432 001007 BNE 1% 

7819 A 16 BIT MACHINE 

7820 032434 012767 001252 147560 MOV #1252 ,DMTSTA 


t] . 
sSET UP THE FIRST DMA TEST ADDR FOR 
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032442 
032450 


032452 
032460 


032466 
032470 


032474 
032476 


032502 
032506 


032510 


032556 


012767 
000442 


012767 
012767 


005000 
012701 


012777 


012700 
012701 
010031 
022701 
001374 


005067 
012700 
016701 
004767 


012767 


000021 001316 


o0S252 147542 
000023 001300 


002324 


000200 
002342 


177600 147624 


077406 
002344 


002364 


027454 145220 


K16 


MACRO M1200 12-DEC-83 16:16 PAGE 132-1 SEQ 205 
- DMAADR - 
sA 16 BIT MACHINE 
MOV #17. ,BITSTO SSET THE BITS bs dy TO 16 + 1 
BR 10$ sSINCE MEM MGT ISN'T PRESENT 


s THERE'S NO NEED TO SET UP THE MEM MGT REGS. 
3* 
; SET UP THE HIGHEST POSSIBLE TEST ADDRESS IN DMTSTA 


; 
1$: MOV #5252 ,DMTSTA sSET UP THE FIRST DMA TEST ADDRESS FOR THE 


; 18 BIT MACHINE. 

MOV #19. ,BITSTD sSET THE BITS TESTED TO 18 BITS + 1. 
3¢ 
; SET UP THE PARS 0 THROUGH 6 TO RELOCATE TO THE SAME ADDRESS 
— 

CLR RO sSET THE PAGE BASE ADDRESS TO ZERO 

MOV OPARATB,R1 sPOINT AT THE START OF THE PAR ADDRESS TABLE 
2s: MOV RO,@C(R1)+ sLOAD THE PAR 

ADD #200,RO sCALCULATE THE NEXT PAGE ADDRESS 

CMP @PAR7A,R1 sLOOP UNTIL PARS O THROUGH 6 

BNE es sARE LOADED. 


3¢ 
; SET UP THE INPUT/OUTPUT PAGE PAR TO THE TOP 4KW OF PHYSICAL MEMORY 
ed 


MOV #177600,8PAR7A ;SET PAR #7 TO POINT AT THE TOP 4kW 


3¢ 
; SET UP THE PORS FOR , NO ABORT/TRAP,UPWARD EXPANSION,128 BLOCKS PER PAGE 


MOV @PDRATB,R1 sPOINT AT START OF POR ADDR TABLE 
4$: MOV RO,@(R1)+ 3 

CMP @PORATE ,R1 sLOOP UNTIL ALL PORS HAVE 

BNE 4$ sBEEN SET UP. 


SET THE MEM MGT STATUS REG #3 FOR, 18 BIT ADDRESSSING, 

NO UNIBUS MAPPING, NO D SPACE, IN CASE THIS REG EXISTS. 

NOT ALL UNIBUS MACHINES HAVE MEM MGT STATUS REG #3, SO THE CKTRAP ROUTINE 
MUST BE USED TO CATCH AN 004 TRAPS THAT OCCUR IF THE REG DOES NOT EXIS™. 


CLR 70% sSET UP THE SOURCE OPERAND 

MOV #70% ,RO sSET UP THE SOURCE ADDR FOR THE MOVE. 

MOV MMSR3,R1 sSET UP THE DESTINATION ADDR FOR THE MOVE. 
JSR PC,.CKTRAP sPERFORM THE MOVE AND CATCH ANY 004 TRAPS. 


3° 

s TRY AND FIND A COMPLEMENTARY PAIR OF ADDRESSES WITHIN THE MEMORY AND SAVE 
s THE CONTENTS OF THE TWO AREAS. THE TEST IS ABANDONED IF A COMPLEMENTARY 
s PAIR HAS NOT BEEN FOUND BEFORE THE AREA OF MEMORY CONTAINING THE 

s OIAGNOSTIC IS ENCOUNTERED. 


g° 
10%; MOV @TP4BRT 4 sCHANGE THE 004 TRAP VECTOR TO POINT TO 
sTP4BRT SINCE THIS IS THE ROUTINE ASSOCIATED 


| 
| 
| 
| 
MOV - @77406,,RO ;BIT PATTERN FOR THE PDRS | 
| 
| 
;WITH THE BYTE SUBROUTINE CKTRPB. | 


HARDWARE TEST 


032564 
032564 
032566 
032572 


032576 


032704 
032712 


032714 


104431 
010067 
012701 
005004 
005204 
905005 
012703 


022767 
001014 


012767 


012767 


147434 


003602 


003602 
000002 


147354 
147344 
001104 


001122 


176000 147332 


164712 
147324 


000252 147310 


000652 
040000 
147274 
000016 001024 


147300 


L16 
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MEMORY FFREM 


12%: INC 


14$: CMP 


DEC 


3¢ 
sSINCE WE 


OBUFBAS ,R1 
R4 


R4 
RS 


#16 *e R3 

PC ,.OMRW 
OBUFMID,R1 
TP4FLG 

14% 


R4 
@BUF BAS ,R1 


17$ 
DMTSTA,OOTSTA 


OMTSTA 
BITSTO 


#176000, DMTSTA 


12% 
PC ,.0M168 
RO,FFREM 
12% 


sGET THE ADDRESS OF THE FIRST ae 


MOV 
sOF MEMORY ABOVE THE DIAGNOSTIC. 
sPOINT AT THE BUFFER WHERE THE CONTENTS OF 


;THE MEMORY BEING READ ARE TO BE SAVED. 
sCLEAR THE COMPLEMENTARY PAIR INDICATOR (CPI) 


C$MEM 


s INCREMENT THE CPI 

sINDICATE THAT A SAVE OF THE DATA AT 
:COMTSTA) IS REQUIRED. 

;SET THE NUMBER OF BYTES TO BE READ 

i SAVE THE DATA CONTAINED AT ADDRESS DMTSTA. 
sPOINT AT SECOND STORAGE AREA 

sIF WE HAVE VALID MEMORY THEN AVOID CLEARING 
sTHE CPI AND RESETING THE SAVE AREA ADDR 


sCLEAR THE CPI. 

sRESET THE ADOR FOR THE SAVED DATA STORE 
sIF A PAIR OF COMPLEMENTARY ADDRESSSES HAVE 
sBEEN FOUND THEN 

:GO AND WRITE THE TEST DATA TO THESE ADORS. 
sSAVE THE OLD DMTSTA 

sCLEAR CARRY READY FOR THE ROTATION 
sCOMPLEMENT THE DMTSTA TO PRODUCE THE NEXT 
s_OMA TEST ADOR. 

sDECREMENT THE NUMBER OF BITS TESTED COUNT 


THE NEW DMTSTA IS NOT INSIDE THE DIAGNOSTIC PROGRAM 


sIS THE DMTSTA > 1252 , IF IT IS THEN WE'RE 


: SAFE SO, 

sBRANCH AND CONT re WITH THE SEARCH 

; CONVERT THE OMTSTA TO A PHYSICAL ADDR. 

sARE WE INSIDE THE DIAGNOSTIC REGION ? 

sNO , THEN BRANCH AND CONTINUE WITH THE SEARCH 


ARE NOW INSIDE THE DIAGNOSTIC, WE INCREMENT BIT @14 OF THE DMTSTA 


sPHYSICAL ADDRESSS AND IF WE'RE STILL INSIDE THE DIAGNOSTIC WE ABANDON THE 
sTEST. ONCE WE ARE IN THIS REGION WE ARE ONLY ABLE TO TEST THE LOWEST 14 BITS. 


@252,DMTSTA 

15% 

#652 ,O0MTSTA 
#40000, RO 

RO, FFREM 

15$ 

#14. ,BITSTD 


sIF THE BIT HAS ALREADY BEEN SET THEN 

sABANDON THE TEST, AFTER REPORTING THE ERROR , 
s BECAUSE NO SUITABLE MEMORY HAS BEEN FOUND. 
sSET THE BIT 

sADD THE BIT INTO THE PHYSICAL ADDR 

sIF WE'RE NOW STILL INSIDE THE DIAGNOSTIC THEN 
sREPORT ERROR AND ABANDON THE TEST. 

sOTHERWISE SET THE BITS TESTED TO 14 BITS. 


RO,FFREM 


SEQ 206 
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7933 032742 000716 


7936 032744 
7937 032750 


005267 
012701 


152346 
010216 


7941 032754 000167 000754 


7947 s- 
012700 005130 


016767 147232 
016767 000774 


012703 000020 
012705 000001 


000776 
147222 


012701 
004767 


7961 033020 005267 
012701 


000340 
172256 


152272 
010264 
164626 
147214 
147152 


147170 


7977 t- 


7983 s- 
7985 033066 005267 152224 


7988 033072 004767 164776 


15$; 


16%: 


17$: 


M16 
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INC 
MOV 


JMP 


INC 


JSR 


12s 


ERRNBR 
#EM4402 ,,R1 


34$ 


@SDPBAS ,RO 


DMTSTA,DUMY 
ODTSTA,OMTSTA 


#16. ,R3 
#1,P5 
#340,R1 
PC, STPSW 


ERRNBR 
9EM4403,R1 


ERRNBR 


PC ,FINACT 


;CONTINUE WITH THE SEARCH. 


;SET THE ERROR NUMBER TO 4402 
sSELECT MESSAGE TO BE REPORTED. 


; “ NO SUITABLE ADDR FOUND. DMA TEST ABORTED ” 


;JUMP TO THE ERROR. 


3+ 
; WRITE THE TEST DATA INTO THE TWO AREAS JUST FOUND. IF A TRAP OCCURS WHILE 
; WE ARE WRITING DATA INTO THESE AREAS THEN THE HOST MACHINE IS AT FAULT. 


;SET UP THE SOURCE ADDR FOR THE MOVE AS OUR 
sTEST DATA PATTERN. 

sSAVE THE LOWER DMTSTA 

sSTART WITH THE HIGHER OF THE TWO 

: COMPLEMENTARY ADDRESSES. 

;SET THE NUMBER OF DATA BYTES TO BE WRITTEN 
S INDICATE TO WRITE TO OMTSTA 


sSET PRIORITY 7 TO DISABLE THE CLOCK 
: 


sSET THE ERROR NUMBER TO 4403 
}SELECT THE MESSAGE, 


; "HOST FAILURE. WRITE FAILED TO AN ADDR WHICH 
;HAD BEEN SUCCESSFULLY READ, TEST ABANDONED ” 


sPERFORM THE TRANSFER 

sEXIT IF HOST FAILURE 

;AND REPORT ERROR. 

sSELECT THE LOWER DMA TEST ADOR. 
sSELECT THE NEXT DATA PATTERN 
sPERFORM THE TRANSFER 

sEXIT IF HOST FAILURE 

5 


3¢ 
; SET UP THE DHU TO PERFORM THE DMA. 


3¢ 

s SET INTERNAL LOOPBACK, ENABLE THE RECIEVER FUNCTION ON THE LINE. 

; SET THE LPR ON THE LINE TO 38.4K BAUD, 8 BITS PER CHARACTER, OOD PARITY, 
s 2 STOP BITS. ENABLE THE TRANSMITTER ON THE LINE. 


sSET THE ERRNBR TO 4404 


sFIRST A AN ACTIVE LINE ON WHICH TO PERFORM 


3 THE DMA 


SEQ 207 


033076 010102 MOV R1,R2 sSAVE THE LINE NUMBER ON WHICH THE DMA WILL OCCUR 


033100 012701 01036! MOV 0EM4404 ,R1 sSELECT THE MESSAGE, 
s_ "NO ACTIVE LINES , TEST ABANDONED” 
033104 103402 BCS .*6 sEXIT IF A LINE COULD NOT BE FOUND ,AFTER FIRST 
033106 000167 000424 - JP 30$ : sRESTORING THE CONTENTS OF MEMORY. 
033112 010201 - MOV R2,R1 sRESTORE THE ACTIVE LINE NUMBER, 


7° 
; AN ACTIVE LINE HAS BEEN FOUND 
:- 


033114 012700 000204 MOV #204 ,RO sPASS THE LNCTRL CONTENTS 

033120 004767 174034 JSR PC ,WTWLNC sINITIALISE THE LNCTRL REGISTER 
8002 033124 012700 177670 MOV @177670,RO sPASS THE LPR CONTENTS 

033130 004767 174054 JSR PC, WTWLPR sINITIALISE THE LPR REGISTER 

033134 004767 172362 JSR PC, TXENBL sENABLE TRANSMITTER ON THE LINE 


3¢ 
; INITIATE THE DMA 
a 


033140 016.05 000626 MOV ODTSTA,RS sSTART FROM THE HIGHER OF THE PAIR OF ADDR. 
033144 012704 005150 MOV @SDPBAS ,R4 sSET UP THE ADOR OF THE DATA PATTERN 
033150 010167 000610 MOV R1,60% sSAVE THE LINE NUMBER FOR THE DMA 
033154 012767 000002 000600 MCV 2,708 sINITIALISE THE LOOP COUNT 
033162 012700 000052 188: MOV #52 ,R0 sSET UP THE LSB'S 
033166 005003 CLR R3 sCLEAR THE REG THAT WILL HOLD THE 6 MSB’'S 
033170 012702 000006 MOV #6 ,R2 sCONVERT THE DMTSTA INTO 
033174 006305 20%: ASL RS sA PHYSICAL ADDRESS WITH 
033176 006103 ROL R3 sTHE MSB‘S IN REG 03. 
033200 005302 DEC Re ; 
033202 001374 BNE 20% i 
033204 032705 000100 BIT #100,RS sTEST BIT 06 OF THE DMTSTA 
033210 001402 BEQ 2e% s 
033212 012700 000025 MOV #25,R0 sALTER THE LSB‘S IF BIT 6 WAS SET. 
033216 060005 228: ADO RO,RS ;ADO IN THE LSB‘S 
033220 052703 000200 BIS #200 ,R3 sSET BIT @7. 
033224 016777 000534 146746 MOV 80% ,BCSRA sSELECT THE LINE ON WHICH TO PERFORM THE DMA. 
033232 012767 010465 152056 MOV @4405..ERRNBR ;SET ERROR NUMBER 4405 
033240 012701 010420 MOV @EM4405,,R1 sSELECT THE MESSAGE, 
s_“ DMA_START BIT FOUND SET BEFORE DMA INIT. 
sTEST ABANDONED” 
033244 105777 146744 TSTB @TXAD2A sTEST THE DUT OMA-START BIT 
033250 100532 BMI 30% sEXIT WITH ERROR IF SET ,AFTER FIRST RESTORING 


sTHE CONTENTS OF MEMORY. 


033252 012777 000020 146736 MOV #16. ,@TXBFCA sSET UP CHARACTER COUNT 
033260 010577 146726 MOV RS,@TXADIA sSET UP BITS O TO 15 OF THE PHYISCAL ADOR. 
033264 110377 146724 MOVB R3,8TXAD2A sSET UP BITS 16 TP 21 , AND INITIATE THE DMA. 


3° 
3s WAIT FOR THE DMA TO COMPLETE AND THE LAST CHARACTER TO BE RECIEVED 
ge 


033270 012701 170144 MOV @170144,R1 sTEST BIT 15, TIME-OUT OF 100 MS. 
033274 016702 146700 MOV CSRA,R2 sPASS THE ADDR OF THE REG TO TEST. 
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TEST 


033300 
033304 
033310 
033314 
033316 


033332 
033334 


033340 
033346 


8082 033400 


005267 
004767 
012701 
103110 
010402 
012704 


004767 
010204 


005003 
012705 


012767 
012701 


017702 
100067 


012700 
040200 
001011 
004767 


005267 
012701 


005305 
001453 


000753 
012767 
010201 
012702 


012767 
012767 


005203 
022703 


152012 


173574 
010514 


000005 
164220 


000200 


010467 
010570 


146624 


170301 


171256 


151716 
010652 


010471 
010715 


015536 
177777 


000322 
000020 


ied 


MACRO M1200 12-DEC-83 16:16 PAGE 152-5 
- DMAADR - 
INC ERRNBR sSET ERROR NUMBER TO 4406 
JSR PC,WAIBIS sWAIT FOR BIT TO SET 
MOV 0EM4406,R1 sSELECT THE MESSAGE 
;_" TIME-OUT OCCURED WAITING FOR DMA TO 
sCOMPLETE. TEST ABANDONED” 
BCC 30% sEXIT IF TIME-OUT OCCCURED, AFTER FIRST , 
sRESTORING THE CONTENTS OF MEMORY. 
MOV R4,R2 sSAVE R4 
MOV @5,.R4 sSET S MS DELAY 
JSR PC DELAY sDELAY TO ALLOW LAST CHARACTER TO BE RECIEVED 
MOV oR4 sRESTORE R4 
s¢ 
; READ THE CONTENTS OF THE RXFIFO AND COMPARE THEM WITH THE CORRECT DATA 
3 - 
CLR R3 sCLEAR THE READ DATA COUNTER 
MOV #128. ,R5 sSET THE MAX BMP CODE READ COUNT 
151750 24%: MOV @4407.,ERRNBR ;SET THE ERRNBR TO 4407 
MOV EM4407,R1 sSELECT THE MESSAGE , 
s_“ RXFIFO EMPTY TOO SOON, DMA FAILED 
sTEST ABANDONED” 
MOV QRBUFA,R2 sREAD THE CHARACTER FROM THE FIFO 
BPL 30$ sBRANCH TO REPORT ERROR IF FIFO EMPTY TOO SOON, 
SAF TER FIRST ~-¥ ary THE CONTENTS OF MEMORY. 
MOV #170301,R0 sSET UP BIT MASK OF A BMP CODE 
BIC R2,RO sTRY TO CLEAR THE BMP CODE MASK 
BNE 28% sBRANCH IF NOT A BMP CODE 
JSR PC, SAVBMP sSAVE THE BMP CODE ON THE QUEUE 
INC ERRNBR sSET THE ERRNBR TO 4408 
MOV 0€M4408 ,R1 so SEO THE MESSAGE, 
“TOO MANY BMP CODES FOUND IN THE RXFIFO, 
iTEST ABANDONED “ 
DEC RS sDEC THE MAX BMP CODE READ COUNT 
BEQ 30% sGO REPORT ERROR IF TOO MANY BMP CODES FOUND , 
sAFTER FIRST RESTORING THE CONTENTS OF MEMORY. 
BR 24% sD0N’T COUNT THE BMP CODE AS A VALID CHARACTER 
151676 26%: MOV 04409. ,ERRNBR ;SET THE ERRNBR TO 4409 
MOV R2,R1 sSAVE THE CHARACTER FROM THE FIFO 
MOV @€M4409,,R2 sSELECT THE MESSAGE 
s_" BAD BIT BETWEEN BITS 0 AND “ 
151666 MOV #€R9101,ERRBLK ;SELECT THE ERROR ROUTINE. 
000332 MOV @-1,SUCSS sINDICATE ‘BAD BITS’ FAILURE 
CMPB = (R4)+,R1 sCOMPARE CHAR FROM FIFO WITH THE CORRECT DATA. 
BNE 30% sBRANCH IF INCORRECT AND RESTORE MEM CONT'S. 
CLR sucss s INDICATE NON TEST scores FAILURE E.G. 
INC R3 sCOUNT THIS CHARACTE 
CmP #16, ,R3 sHAVE WE RECIEVED ALL THE CHARACTERS ? 


TIME -OUTS 


SEQ 209 


ee  -—e—ad 
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8104 033460 001327 BNE 243 sLOOP UNTIL ALL CHARACTERS (NON-BMP) ARE READ. 
8105 033462 005367 000274 DEC 70$ sOECREMENT THE LOOP COUNT 
8106 033466 001420 BEQ 293 sBRANCH IF BOTH OMA’S ARE COMPLETED 
8107 033470 012704 005154 MOV @SOP2B ,R4 sSET UP THE SECOND DATA PATTERN 
Sios 033474 016705 146522 MOV OMTSTA,RS 3SET UP THE OTHER DMA TEST ADDRESS 
8110 033500 012767 010472 151610 MOV 04410. ,ERRNBR sSET ERRNBR TO 4410 
8111 033506 012701 010752 MOV @EM4410,R1 sSELECT THE MESSAGE 
8112 3 “ RXFIFO FAILED TO "PURGE, TEST ABANDONED ” 
aria 033512 012767 014124 151602 MOV MERCSO3,ERRBLK ;SELECT THE ERROR ROUTINE 
8115 033520 004767 167216 JSR PC,PUFIFO sPURGE THE RXFIFO 
8116 633524 103004 Bcc 30% sEXIT WITH ERROR IF FIFO WOULD NOT PURGE 
8117 sAFTER FIRST RESTORING THE CONTENTS OF MEMORY . 
at 033526 000615 BR 18$ sOTHERWISE REPEAT. 
119 
8120 033530 012767 000001 000236 293: MOV #1,SUCSS s INDICATE THAT WE HAVE BEEN ABLE TO TEST, 
8121 sSOME OF THE BITS. 
8122 
8123 
8124 3¢ 
8125 3; RESTORE THE ORIGINAL DATA IN THE MEMORY 
8127 : 
8128 033536 016767 146460 000224 30%: MOV OMTSTA,OUMY sSTART WITH THE HIGHER OF THE PAIR OF DMTSTA 
8129 033544 016767 000222 146450 MOV OOTSTA,OMTSTA 3 
8130 033552 012700 003602 MOV BUF BAS ,RO sPOINT AT THE START OF THE SAVED DATA AREA 
8131 033556 012705 000001 MOV @1,R5 sSELECT WRITE TO (CDOMTSTA) 
8132 033562 012703 000020 MOV #16. ,R3 sPASS NUMBER OF BYTES TO BE WRITTEN 
8133 033566 004767 164070 JSR PC .OMRW sRESTORE THE DATA 
8134 033572 005767 146456 TST TP4FLG ;GO REPORT ERROR IF A TRAP OCCURED 
8135 033576 001012 BNE 318 3 
8136 033600 016767 000164 146414 MOV OUMY ,.DMTSTA sNOW RESTORE THE DATA FROM THE LOWER 
6137 3O0F THE PAIR OF TEST ADDRESSES. 
8138 033606 012700 004202 MOV @BUF MID ,RO iPOINT AT THE START OF THE SAVED DATA AREA 
aise 033612 004767 164044 JSR PC ,OMRW sRESTORE THE DATA 
8141 033616 005767 146432 TST TP4FLG sGO REPORT ANY ERRORS IF A NO TRAP 
apy 033622 001411 BEQ 328 s OCCURED DURING THE RESTORE. 
8144 033624 012767 010473 151464 31%: MOV 04411. ,ERRNBR sSET THE ERROR NUMBER TO 4411 
8145S 033632 012701 011001 MOV 0EM4411,R1 sSELECT THE MESSAGE , 
8146 “ HOST FAILURE. WRITE FAILURE TO AN ADOR 
8147 WHICH HAD PREVIOUSLY BEEN SUCCESSFULLY 
8148 WRITTEN To. “ 
8149 033636 012767 014124 151456 MOV #€ROS5O03, ERRBLK iSELECT THE ERROR ROUTINE 
8150 033644 000433 BR 34% sREPORT THE ERROR 
8151 
8152 3° 
8153 ; HAS THE TEST BEEN SUCCESSFUL, PRINT THE BITS TESTED IF IT HAS, 
8154 s REPORT THE ERRORS OTHERWISE. 
8155 3° 
gis? 
8158 033646 005767 000122 328: TST sucss sIF THE ERROR IS NON TEST SPECIFIC THEN 
8159 033652 001430 BEG 34% sBRANCH TO REPORT E S 


RROR 
8160 033654 016701 000106 MOV BITSTO,R1 sLOAD THE NUMBER oF BITS TESTED 


Ei 


DHU-11 FUNCTIONAL VERIFICATION MACRO M1200 12-DEC-83 16:16 PAGE 132-7 SEQ 211 
HARDWARE TEST - DMAADR - 

8161 033660 005301 DEC R1 sDEC TO GIVE THE BIT POSITION OF THE MSB TESTED. 

8162 033662 022767 000001 000104 CMP #1,SUCSS sIF THE BITS TESTED ARE BAD THEN 

8163 033670 001021 BNE 34$ sBRANCH AND REPORT ERRORS. 

316s 

3¢ 
ait ; OTHERWISE DETERMINE IF PRINTING OF THE SUCCESSFULLY TESTED BITS WAS REQUESTED. 
1 3- 

8169 

8170 033672 032767 000040 146262 BIT @BITOS,OPTION ; PRINT THE BITS TESTED IF THE SOFTWARE 

8171 033700 001416 BEQ 60% sOPTION HAS REQUESTED IT 

8172 033702 010102 MOV R1,R2 sCALCULATE THE NUMBER OF BITS WHICH HAVE 

8173 033704 INC R2 s BEEN TESTED SUCCESSFULLY. 

8174 033706 PRINTB O€F4401,R1,R2 sPRINT THE NUMBER OF BITS TESTED MESSSAGE. 
033706 010246 MOV R2,-(SP) 
033710 010146 MOV R1,-(SP 
033712 012746 005554 MOV @€F 4401, -( SP) 
033716 012746 000003 MOV 03, -C 
033722 010600 MOV eRO 
033724 104414 TRAP CSPNTB 
033726 062706 000010 ADD #10,SP 

et 033732 000401 BR 60$ sEXIT THE TEST 

8177 

8178 033734 34%: ERROR ; REPORT ERRORS 
033734 104460 TRAP CSERROR 

8179 

8180 

8181 033736 608: SETPRI #PRIOS sENABLE THE CLOCK 
033736 012700 000240 MOV @PRIOS,RO 
033742 104441 TRAP C$SPRI 

8182 033744 016767 146306 144032 MOV TP4VEC ,4 sRESTORE THE NORMAL 004 TRAP VECTOR 

Beas 033752 146242 CLR CTRLCF sINOICATE THAT WE ARE NOT WITHIN A TEST 

8185 033755 EXIT TST 
033756 104432 TRAP CsExIT 
033760 000016 -WORD L10030-. 

6186 

8187 

8188 3¢ 

re § Seesesececoseeasseenes LOCAL VARIBLE AREA sesssccccacsssecesesssccceesses 

t- 

8191 ‘ 

8192 033762 000000 708: -WORD O sCOUNTER FOR THE NUMBER OF DMA’'S COMPLETED 

8193 033764 000000 80%: -WORD O sSAVE AREA FOR THE ACTIVE LINE NUMBER 

8194 033766 000000 BITSTO: .WwORD 0 sNUMBER OF BITS TESTED 

8195 033770 000000 Y: «WORD O sDUMMY VARIABLE 

8196 033772 000000 OOTSTA: .WORD 0 sHIGHER OF THE PAIR OF COMPLEMENTARY ADDR. 

8197 033774 000000 sucss -WORD O sSUCCESS INDICATOR, -1 - ERROR DUE TO BAD BITS 

6198 3 1 - SUCCESSFUL TEST 

8199 F O - OTHER ERRORS 

8200 

8201 3° 

pees | $96666666666066660606600600606 END 66666666660660660660606006000600000000000008 

20 s- 

8204 


eee 
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HARDWARE TEST - O 


8206 
8207 033776 
033776 
033776 104401 


ENDTST 


L10030: 


TRAP 


CSsETST 


SEQ 212 


ES ae 


Gl 


DHU-11 FUNCTIONAL VERIFICATION MACRO M1200 12-DEC-83 16:16 PAGE 133 SEQ 213 
HARDWARE TEST FRMERR | 
8209 .SBTTL HARDWARE TEST - FRMERR - | 
8210 TO CeRARAAAAERAERERAREARAREEAEAARAAEHEEEEASASREEAEABLAEREDEAEAAEAEEEAEAAEEEABEEEEEEEEEROEESE 
8211 3:4 - FRAMING ERROR GENERATION TEST - | 
1 34% 
8213 34 THIS TEST IS USED TO VERIFY THE FRAMING ERROR DETECTION CAPABILITIES 
8214 3* OF THE DHU11. 
8215 ;* WHEN IN STAGGARED LOOPBACK MODE, CHARACTERS ARE TRANSMITTED FROM 
8216 74 ONE GROUP OF LINES AT 8 BITS/CHAR, ne RECEIVED BY THE OTHER GROUP 
8217 34 AT 5S BITS/CHAR. THIS WILL GENERATE A FRAMING ERROR FOR EACH C“ARACTER. | 
8218 34 THIS TEST WILL ONLY EXECUTE IF THE STAGGARED LOOPBACK MODE ts SELECTED. | 
8219 34 THE SPECIAL STAGGARED LOOPBACK BERG CONNECTOR MUST BE FITTED. 
8220 ;4 THE ACTIVE LINES BIT MASK IS USED TO INDICATE WHICH LINES HAVE BEEN 
— :* REMOVED FROM FURTHER TESTING. 
3* 
8223 F — ~“FASEAAEASESASELELAEALAREAESEAEAREEEREEESEEEADEAEEASEEEEEEAEEEEEEESEEREEEREEEEEESE 
8224 034000 BGNTST 
034000 TS:: 
8225 se 
— 3; EXECUTE THIS TEST IN STAGGARED LOOPBACK MODE ONLY. 
5 = 
8228 034000 126727 146170 000002 CMPB = LOPBCK,, #2 sCHECK MODE SELECTED. 
8229 034006 001402 BEQ .+6 sAVOID EXITING THE TEST IF STAGGERED LOOPBACK 
8230 sMODE IS SELECTED. 
8231 034010 000167 000372 JMP 60% ; EXIT THE TEST. 
8232 034014 SETPRI @PRIOS sALLOW LTC INTERRUPTS. 
034014 012700 000240 MOV @PRIOS,RO 
034020 104441 TRAP CSSPRI 
8233 034022 012767 177777 146170 MOV -1,CTRLCF s INDICATE THAT WE ARE IN A TEST 
8234 000005 TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. | 
8235 034030 012767 000005 146222 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (62) | 
8236 034036 012767 000001 151250 MOV @1,ERRTYP sSET ERROR TYPE IN ERROR TABLE. 
8237 034044 012767 014071 151244 MOV @6201..ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. | 
8238 034052 012767 011117 151240 MOV @EM6201,ERRMSG ;SET ERROR MESSAGE ADORESS IN ERROR TABLE. 
8239 034060 005067 146414 CLR ERSMRF sINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS. 
sate 034064 005067 146134 CLR FERROR s;CLEAR THE “AT LEAST ONE ERROR” INDICATOR. 
3¢ 
8242 3; RESET THE DUT 70 A KNOWN STATE, REMOVE STATUS CODES FROM THE FIFO. 
8243 ; CLEAR TX AND RX INTERRUPT ENABLE BITS. 
ee 3 THIS SUBROUTINE REPORTS ERROR >>>>> 6201 <<<<<, 
ge 
8246 034070 004767 163334 JSR PC,.CLNRST sRESET THE DUT. | 
ol 034074 103144 BCC 60% sABORT THE TEST IF FATAL ERROR FOUND IN RESET. 
3¢ 
8249 : DISABLE ALL INTERRUPTS. 
aay 3; SET UP DMA TX AND RX INTZRRUPT SERVICE ROUTINES. 
t- 
8252 034076 SETPRI @PRIO7 :DISABLE ALL INTERRUPTS. 
034076 012700 000340 MOV @PRIO7,.RO 
034102 104441 TRAP CSSPRI 
8253 034104 SETVEC TXVECA, @TXDMA, OPRIO6 sSELECT DMA TX INT SERVICE RTN. 
034104 012746 000300 MOV @PRIOG, -( SP) 
034110 012746 027520 MOV @TXDMA, -(SP) 
034114 016746 146050 MOV TXVECA, -(SP) 


8254 034132 SETPRI #PRIO4 


MOV @3,-C(SP) 

TRAP CS$SVEC 

ADD #10,SP 
sALLOW INTERRUPTS. 


Hi 
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034132 
034136 


034140 
034144 
034150 


012700 000200 
104441 


005067 146336 
005067 146334 
005067 145110 


012700 003302 
004767 163266 
005067 147412 


005267 151066 
004767 166570 


012767 014075 


004767 171346 
012705 100000 


004767 162550 
905767 145740 
032767 000100 


004767 163650 
005267 151006 


151052 


145666 


MOV oPRIO4 ,RO 
TRAP C$SPRI 


3¢ 
; CLEAR TX, RX, AND DMA_START ERROR FLAGS. 
= 


CLR TXDONF sCLEAR TX DONE FLAGS FOR ALL LINES. 
CLR RXDONF sCLEAR RX DONE FLAGS FOR ALL LINES. 
CLR TXINTF sCLEAR TX ERROR FLAGS FOR ALL LINES. 


; "SET UP ERROR TABLE AND DATA PATTERN TABLE. 

; THE NUMERICAL VALUE OF THE CHARACTER INDICATES THE NUMBER OF THE LINE 
; THAT TRANSMITTED IT. 

ed 


MOV #ERCNTB RO sPASS THE ADDRESS OF THE TABLE TO BE CLEARED. 
JSR PC,CLR16W sCLEAR THE RX ERROR COUNTERS TABLE. 
CLR BUFBAS ;SET SINGLE CHAR DATA TO BE A NULL. 


3¢ 

; INITIALISE DMA PARAMETERS IN THE CONTROL BLOCK. 

3; TRANSMISSION ON LINE GROUP 1 AT 8 BITS/CHAR,1 STOP BITS,ODD PARITY. 
s RECEPTION ON LINE GROUP 2 AT 5 BITS/CHAR,1 STOP,ODD PARITY. 


MOV #156470,RO sPASS LPR PARAMETER FOR & BITS/CHAR. 

MOV #156440,R1 sPASS LPR PARAMETER FOR S BITS/CHAR. 

JSR PC ,GETTIM sGET TIME-OUT BASED ON MINIMUM BAUDRATE IN USE. 
MOV eBUFBAS ,R2 ;PASS START ADDRESS OF DATA PATTERN. 

MOV #1,R3 sPASS LENGTH OF DATA PATTERN. 

MOV LGRP1M,R4 sPASS LINE GROUP OF LINES THAT ARE TO TX. 

JSR PC .FRPSUP sSET UP DUT FOR TRANSMISSION AND RECEPTION. 


3¢ 

3 PURGE THE FIFO OF ANY UN-WANTED CHARACTERS. THIS ROUTINE REPORTS ERRORS 

: WITH WITH ERROR NUMBERS FROM >>>>> 6202 THRU 6204 <<<<<, 

3 PERFORM TRANSMISSION AND RECEPTION AT 9600 BAUD. 

s REPORT ANY ERRORS FOUND, IE. FRAMING ERROR BIT CLEAR OR PARITY ERROR SET. 
g¢ 


INC ERRNBR sSET THE ERROR REPORT NUMBER TO 6202. 
JSR PC,PUFIFR sCLEAN OUT THE FIFO. 
BCC 60% sABORT THIS TEST IF FIFO WOULD NOT PURGE. 
MOV #6205.,ERRNBR ;SET THE ERROR NUMBER TO 6205. 
JSR PC, TXFRPR 3TX DATA PATTERN ON SELECTED ACTIVE LINES. 
MOV #100000 ,R5S sPASS FRAMING ERROR TEST FLAG. 
3¢ 
s THIS SUBROUTINE REPORTS ERROR NUMBER >>>>> 6205 <<<<<, 
i- 
JSR PC,.CKFRPR sREAD CHARACTERS, REPORT ANY ERRORS FOUND. 
TST FERROR sHAS AN ERROR — DETECTED? 
BEQ 2s sBRANCH IF NO ERROR 
BIT #8 1T06 , OPTION SHAS EXTENDED ERROR REPORTING BEEN ENBL'D?. 
BEQ 54% sBRANCH IF IT HASN‘T AND EXIT THE TEST. THE 


iTEST FAILURE MESSAGE HAS BEEN PRINTED. 
3¢ 
s REVERSE TRANSMISSION/RECEPTION ROLES ON ALL ACTIVE LINES, AND REPEAT TEST. 
g° 
2s: COM R4 sREVERSE ROLES FOR TRANSMISSION AND RECEPTION. 


JSR PC ,FRPSUP sSET UP DUT FOR TRANSMISSION AND RECEPTION. 
INC ERRNBR sSET ERROR NUMBER TO 6206. 


Ii 
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012705 


004767 


005767 
001404 
032767 
001406 


005267 


166510 


014101 
171266 
100000 


162470 
145660 
000100 


150734 


171324 
171746 


000340 


145564 


145606 


150772 


145606 


3¢ 
; THIS ROUTNE REPORTS ERRORS WITH NUMBERS »>>>>> 6206 THRU 6208 <<<<<, 
> 


JSR PC,PUFIFR sCLEAN OUT THE FIFO. 
BCC 60$ sABORT THIS TEST IF FIFO WOULD NOT PURGE. 
MOV #6209. , ERRNBR iSET ERROR NUMBER TO 6209. 
JSR PC, TXFRPR 3TX DATA PATTERN ON SELECTED ACTIVE LINES. 
MOV #100000 ,R5S sPASS FRAMING ERROR TEST FLAG. 
:¢ 
; THIS SUBROUTINE REPORTS ERRORS >>>>> 6209 <<<<<, 
:- 
JSR PC,CKFRPR sREAD CHARACTERS, REPORT ANY ERRORS FOUND. 
TST FERROR sHAS AN ERROR BEEN DETECTED? 
BEQ 4$ s;BRANCH IF NO ERROR 
BIT @BITO6.OPTION ;HAS EXTENDED ERROR REPORTING BEEN ENBL‘D? 
BEQ 54% sBRANCH IF IT HASN’T AND EXIT THE TEST. THE 


;TEST FAILURE MESSAGE HAS BEEN PRINTED. 


4$: INC ERRNBR ;SET ERROR NUMBER TO 6210. 


; DISABLE INTERRUPTS. 

; CLEAR THE INTERRUPT VECTORS. 

; UPDATE THE ACTIVE LINES BIT MAP TO REFLECT LINES REMOVED FROM TESTING. 
; THIS SUBROUTINE REPORTS ERRORS >>>>> 6210 THRU 6212 <<<<<, 

3 


JSR PC, TXIEO sOISABLE ALL TX INTERRUPTS. 
JSR PC, TXRREP sREPORT FINAL ERRORS FROM TX/RX. 


54%: SETPRI @PRIO7 sDISABLE ALL INTERRUPTS. 


MOV @PRIO7,RO 

TRAP CsSPRI 
CLRVEC TXVECA sRETURN TX INT VECTOR TO UNUSED POOL. 

MOV TXVECA,RO 


TRAP CsCvEC 


60$: CLR CTRLCF s INDICATE THAT WE ARE NOT WITHIN A TEST. 


L10031: 
TRAP CsETST 


SEQ 215 


Jl 
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HARDWARE TEST PARERR 
8346 .SBTTL HARDWARE TEST - PARERR - 
8347 PH CRARAAARAAARAERERAEAEAAAEREAEEEERERBEEREEEEAEEEAEEAEEAEEAEAEEEEEEEEEEEEAAEAAKEKREREAS 
8348 ;* - PARITY ERROR GENERATION TEST - 
8349 7% 
8350 34 THIS TEST IS USED TO VERIFY THE PARITY ERROR DETECTION AND REPORT 
8351 34 CAPABILITIES OF THE DUT. 
8352 3% WHEN STAGGARED LOOPBACK MODE IS SELECTED, DATA IS TRANSMITTED 
8353 3% ON ALL ACTIVE LINES IN LINE GROUP 1 WITH ODD PARITY SELECTED, 
8354 3% ANDO RECEIVED ON LINES IN GROUP 2 WITH EVEN PARITY SELECTED. 
8355 34 THIS WILL GENERATE A PARITY ERROR FOR EACH CHARACTER RECEIVED. 
8356 34 THE PARITY SELECTION IS THEN REVERSED ON THE LINES IN EACH GROUP 
8357 3% AND THE TEST IS REPEATED. 
8358 3% THIS TEST WILL ONLY EXECUTE IF THE STAGGARED LOOPBACK MODE IS SELECTED. 
oH 3* THE SPECIAL STAGGARED LOOPBACK BERG CONNECTOR MUST BE FITTED. 
0 3% 
8361 3 — ~“SPAAAARARALASLERESABLAEAALAREASLEEEAEESEAESEESEEAEAEEBEREEEEREAEEEEEEESSEEEEEEBEEDRE 
8362 034414 BGNTST 
034414 T6:: 
8363 3¢ 
io. ; EXECUTE THIS TEST IN STAGGARED LOOPBACK MODE ONLY. 
lg 
8366 034414 126727 145554 000002 CMPB- =LOPBCK,#2 sCHECK MODE SELECTED. 
8367 034422 001402 BEQ +6 sAVOID EXITING THE TEST IF STAGGERED LOOPBACK 
8368 sMODE IS SELECTED. 
34 034424 000167 000434 JMP 60$ ; EXIT THE TEST. 
8371 034430 SETPRI #PRIOS sALLOW LTC INTERRUPTS. 
034430 012700 000240 MOV @PRIOS RO 
034434 104441 TRAP C$SPRI 
8372 034436 012767 177777 145554 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST 
8373 000006 TNUM == TNUM +1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
8374 034444 012767 000006 145606 MOV @TNUM, TSTNUM 3SET UP THE TEST NUMBER. (63) 
8375 034452 012767 000001 150634 MOV #1,ERRTYP 3SET ERROR TYPE IN ERROR TABLE. 
8376 034460 012767 014235 150630 MOV #6301. ,ERRNBR sSET THE FIRST ERROR NUMBER IN ERROR TABLE. 
8377 034466 012767 011160 150624 MOV 0EM6301, ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
8378 034474 005067 146000 CLR ERSMRF sINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS. 
rade 034500 005067 145520 CLR FERROR sCLEAR THE “AT LEAST ONE ERROR” INDICATOR 
3¢ 
8381 3; RESET THE DUT TO A KNOWN STATE, REMOVE STATUS CODES FROM THE FIFO. 
8382 s CLEAR TX AND RX INTERRUPT ENABLE BITS. 
one 3; THIS SUBROUTINE REPORTS ERROR >>>>> 6301 <<<<<, 
ge 
8385 034504 004767 162720 JSR PC,CLNRST sRESET THE DUT. 
aoe 034510 103165 Bcc 60$ sABORT THE TEST IF FATAL ERROR FOUND IN RESET. 
t¢ 
8388 ; DISABLE ALL INTERRUPTS. 
aed ; SET UP DMA TX AND RX INTERRUPT SERVICE ROUTINES. 
ed 
8391 034512 SETPRI @PRIO7 sOISABLE ALL INTERRUPTS. 
034512 012700 000340 MOV @PRIO7,RO 
034516 104441 TRAP C$SPRI 
8392 034520 SETVEC TXVECA,@TXDMA, OPRIO6 sSELECT OMA TX INT SERVICE RIN. 
034520 012746 000300 MOV @PRIOG, -(SP) 
034524 012746 027520 MOV @TXDMA, -(SP) 
034530 016746 145434 MOV TXVECA, -(SP) 
034534 012746 000003 MOV 3,-CSP) 
034540 104437 TRAP CsSVEC 
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HARDWARE TEST 


8393 
0 


062706 


012700 
104441 


005067 
005067 
005067 


012700 
004767 


012700 
012701 
004767 
012702 
012703 
016704 
004767 


000010 
000200 


145722 
145720 
145474 


003302 
162652 


166164 


014241 
164032 


162146 
145336 
000100 


150412 


150446 


145264 


SETPRI #PRIO4 


3¢ 
; CLEAR TX/RX FLAGS. 


3 - 
CLR 
CLR 
CLR 


TXINTF 


K1 


3¢ 
; SET UP ERROR COUNTER TABLE. 


3 - 
MOV 
JSR 


* 


i¢ 
; THIS ROUTINE REPORTS ERRORS 


JSR —s- PC, PUF'IFR 
BCC 0Os«w6 OS 
MOV 6305. ,ERRNGR 
JSR —s- PC. INIOMA 
CLR ORS 
Sa 
; THIS SUBROUTINE REPORTS ERROR NUMBER 
ge 
JSR —s- PC. CKFRPR 
TST  FERROR 
BEQ Ss 
BIT  BIT06, OPTION 
BEQ sé‘ 
2s: INC _ ERRNBR 


#ERCNTB,RO 
PC,CLR16W 


#156470,R0 
#156570,R1 
PC ,GETTIM 
@SDP2B ,R2 
#16 ee R3 

LGRP1M,R4 
PC,FRPSUP 


ADD #10,SP 
sALLOW INTERRUPTS. 

MOV #PRIO4 ,RO 

TRAP C$SPRI 


s;CLEAR TX DONE FLAGS FOR ALL LINES. 
sCLEAR RX DONE FLAGS FOR ALL LINES. 
sCLEAR TX ERROR FLAGS FOR ALL LINES. 


sPASS THE ADDRESS OF THE TABLE TO BE CLEARED. 
;CLEAR THE RX ERROR COUNTERS TABLE. 


3¢ 
' 3 INITIALISE OMA PARAMETERS IN THE CONTROL BLOCK. 


sPASS LPR PARAMETER WITH ODD PARITY. 

sPASS LPR PARAMETER WITH EVEN PARITY. 

sGET TIME-OUT BASED ON MINIMUM BAUDRATE IN USE. 
sPASS START ADDRESS OF DATA PATTERN. 

sPASS LENGTH OF DATA PATTERN. 

sPASS BIT MAP OF LINES TO BE SET WITH ODD PAR. 
sSET UP DUT FOR TRANSMISSION AND RECEPTION. 


PURGE THE FIFO OF ANY UN-WANTED CHARACTERS. 

PERFORM TRANSMISSION AND RECEPTION , THE 16 BYTE DATA PATTERN AT 9600 BAUD. 
TRANSMISSION ON LINE IN GROUP 1, 8B 
RECEPTION ON LINES IN GROUP 2 AT 8 BITS/CHAR, 
REMOVE CHARACTERS FROM THE FIFO AND LOOK FOR THE PARITY ERROR BIT BEING ers 
_ REPORT ANY ERRORS FOUND, IE. 


ITS/CHAR, 1 STOP BITS, ODD PARITY. 


1 STOP, EVEN PARITY. 
FRAMMING ERROR BIT SET OR PARITY ERROR CLEAR 


WITH NUMBERS >>>>> 6302 THRU 6304 <<<<<, 


sCLEAN OUT THE FIFO. 

sABORT THIS TEST IF FIFO WOULD NOT PURGE. 
iSET ERROR NUMBER TO 6305 

sTX DATA PATTERN ON ALL ACTIVE LINES. 
sPASS PARITY ERROR TEST FLAG. 


>>>>> 6305 <<ccc, 

sRESD CHARACTERS, REPORT ANY ERRORS FOUND. 
sHAS AN ERROR BEEN FOUND ? 

sBRANCH TO CONTINUE IF IT HASN'T. 

sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
sEXIT THE TEST IF IT HASN'T. THE TEST FAILURE 
sMESSAGE HAS ALREADY BEEN REPORTED. 


sSET ERROR NUMBER TO 6306. 


3¢ 
s THIS SUBROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 6306 THRU 6309 <<<<< 


SEQ 217 


Li 
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HARDWARE TEST PARERR 
8447 * 
8448 034704 004767 171430 JSR PC, TXRREP sREPORT FINAL ERRORS FROM TX/RX. 
8449 034710 005767 145310 TST FERROR sHAS AN ERROR BEEN FOUND ? 
8450 034714 001404 BEQ 4$ sBRANCH TO CONTINUE IF IT HASN'T. 
8451 034716 032767 000100 145236 BIT #BITO6,OPTION sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
8452 034724 001457 BEQ 60$ ;EXIT THE TEST IF IT HASN'T. THE TEST FAILURE 
abe sMESSAGE HAS ALREADY BEEN REPORTED. 
8455 034726 012767 014246 150362 4%: MOV #6310. ,ERRNBR ;SET ERROR NUMBER TO 6310. 
8456 034734 005067 145542 CLR TXDONF sCLEAR TX DONE FLAGS FOR ALL LINES. 
8457 034740 005067 145540 CLR RXDONF ;CLEAR RX DONE FLAGS FOR ALL LINES. 
ord 034744 005067 145314 CLR TXINTF ;CLEAR TX DMA HANDOVER ERROR FLAGS. 
; ‘* 
pose ; REVERSE TRANSMISSION/RECEPTION ROLES ON ALL ACTIVE LINES, AND REPEAT TEST. 
a 3° 
8462 034750 005104 COM R4 ;REVERSE ROLES FOR TRANSMISSION AND RECEPTION. 
rent 034752 004767 163176 JSR PC,FRPSUP 3;SET UP DUT FOR TRANSMISSION AND RECEPTION. 
3¢ 
oat ; THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 6310 THRU 6311 <<<<<, 
is 
8467 034756 004767 166042 JSR PC,PUFIFR ;CLEAN OUT THE FIFO. 
8468 034762 103040 BCC 60$ sABORT THIS TEST IF FIFO WOULD NOT PURGE. 
8469 034764 012767 014250 150324 MOV 96312. ,ERRNBR ;SET ERROR NUMBER TO 6312. 
ode 034772 004767 163710 JSR PC, INIDMA 3TX DATA PATTERN ON SELECTED ACTIVE LINES. 
a se 
oti ; THIS SUBROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 6312 THRU 6316 <<<<<. 
ied 
8474 034776 004767 162026 JSR PC,CKFRPR ;READ CHARACTERS, REPORT ANY ERRORS FOUND. 
8475 035002 005767 145216 TST FERROR sHAS AN ERROR BEEN FOUND ? 
@476 035006 001404 BEQ 6$ sBRANCH TO CONTINUE IF IT HASN'T. 
8477 035010 032767 000100 145144 BIT #BIT06,OPTION sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
8478 035016 001407 BEQ 54$ ;EXIT THE TEST IF IT HASN'T. THE TEST FAILURE 
cnet sMESSAGE HAS ALREADY BEEN REPORTED. 
oo 035020 012767 014255 150270 6%: MOV #6317. ,ERRNBR ;SET ERROR NUMBER TO 6317. 
;¢ 
8483 : DISABLE INTERRUPTS. 
8484 3 CLEAR THE INTERRUPT VECTORS. 
cone 3 UPDATE THE ACTIVE LINES BIT MAP TO REFLECT LINES REMOVED FROM TESTING. 
§° 
rf 035026 004767 170660 JSR PC, TXIEO sDISABLE ALL TX INTERRUPTS. 
z¢ 
woe : THIS SUBROUTINE REPORTS ERRORS >>>>> 6317 THRU 6320 <<<<<, 
g° 
oa 035032 004767 171302 JSR PC, TXRREP sREPORT FINAL ERRORS FROM TX/RX. 
8493 035036 54%: SETPRI @PRIO7 sOISABLE ALL INTERRUPTS. 
035036 012700 000340 MOV @PRIO7,RO 
035042 104441 TRAP C$SPRI 
8494 035044 CLRVEC TXVECA ;RETURN TX INT VECTOR TO UNUSED POOL. 
035044 016700 145120 MOV TXVECA,RO 
035050 104436 TRAP CsCVvEC 
8495 
8496 :¢ 
mtd ; THIS SUBROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 6321 <<<<<, 


3 = 
8499 035052 012767 014261 150236 MOV #6321.,ERRNBR ;,SET ERROR NUMBER TO 6321. 


OHU-11 FUNCTIONAL VERIFIC 


HARDWARE TEST 


8500 035060 

8501 

8502 035064 

8503 035070 
035070 
035070 


004767 167036 
005067 145130 


104401 


60$: 


JSR 


CLR 
ENDTST 


PC,REPSMR 
CTRLCF 


M1 


ATION MACRO M1200 12-DEC-83 16:16 PAGE 134-3 
PARERR - 


sREPORT ERROR SUMMARIES IF CALLED FOR. 
s INDICATE THAT WE ARE NOT WITHIN A TEST. 


L10032: 
TRAP CSETST 


SEQ 219 


a rn 


Ni 
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HARDWARE TEST 
8505 .SBTTL HARDWARE TEST - DMA - 
8506 LO RARER EAAAREERASEAREREREAEERAERAREERERAEAEABREREEAEEEREREEAEEREEASAEHEEEES 
8507 3* - DMA MODE TEST - 
8508 34 THIS TEST VERIFIES THAT THE DEVICE UNDER TEST CDOUT) WILL PERFORM 
8509 3% TRANSMISSION AND RECEPTION CORRECTLY USING THE DMA MODE TRANSMISSION. 
8510 3% THE TEST IS PERFORMED AT ALL BAUDRATES CEXCEPT 50 BAUD), 8 BITS PER 
8511 34 CHARACTER, 1 STOP BIT, AND WITH PARITY CHECKING (BOTH ODD AND EVEN). 
8512 3% A HIGH SPEED TEST IS ALSO PERFORMED AT THE HIGHEST 3 BAUDRATES AT 
8513 34 BOTH 5S AND 8 BITS PER CHARACTER, 1 STOP BIT, AND NO PARITY CHECKING. 
8514 34 THIS TEST IS PERFORMED WITH THE TYPE OF LOOPBACK WHICH WAS SPECIFIED 
oF 3* IN THE DUT HARDWARE P-TABLE ON ALL ACTIVE LINES. 
16 3* 
8517 J —— SHRAAEKAARSAAAEEEESERESAEERESEAEARERELERAELESEEESEESABASAEEASSESASALEEASLEEEEEEE 
8518 035072 BGNTST 
035072 
8519 035072 SETPRI #PRIOS sALLOW LTC INTERRUPTS. 
035072 012700 000240 — #PRIOS,RO 
035076 104441 TRAP C$SPRI 
8520 000007 TNUM == TNUM + 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
8521 035100 012767 7 145152 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER (91) 
8522 035106 012767 177777 145104 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
8523 035114 012767 000001 150172 MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE 
8524 035122 012767 021615 150166 MOV #9101. »ERRNBR iSET THE FIRST ERROR NUMBER IN ERROR TABLE. 
8525 035130 012767 012400 150162 MOV 0€M9101, ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
8526 035136 005067 145336 CLR ERSMRFE sINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS. 
oo 035142 005067 145056 CLR FERROR ;CLEAR THE “AT LEAST ONE ERROR” INDICATOR. 
3+ 
8529 ; RESET THE DUT TO A KNOWN STATE, REMOVE THE STATUS CODES FROM THE FIFO. 
8530 3; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
aoe ; THIS SUBROUTINE REPORTS ERROR >>>>> 9101 <<<<<, 
,. t- 
8533 035146 004767 162256 JSR PC,CLNRST sRESET THE OHU-11, REPORT ANY ERRORS FOUND. 
8534 035152 103402 BCS es ;SKIP AROUND TEST EXIT IF NO FATAL ERROR FOUND. 
sae 035154 000167 000664 JMP 60$ ;RESET FAILURE, ABORT THIS TEST. 
3¢ 
ez ; SET UP FOR TRANSMIT INTERRUPTS. 
ge 
8539 035160 2s: SETPRI, @PRIO7 ;DISABLE ALL INTERRUPTS. 
035160 012700 000340 MOV @PRIO7,RO 
035164 104441 ‘ TRAP C$SPRI 
8540 035166 SETVEC’ TXVECA, #TXDMA, OPRIO6 sSELECT OMA TX INT SERVICE RIN. 
035166 012746 000300 MOV OPRIOG, -C SP) 
035172 012746 027520 ‘ MOV @TXDMA, -C SP) 
035176 016746 144766 MOV TXVECA, -(SP) 
035202 012746 MOV #3,-C 
035206 104437 TRAP CsSvECc 
035210 062706 000010 ; ADD #10,SP 
8541 035214 SETVEC RXVECA, @RXCHRS, #PRIOG ;SELECT RX INT SERVICE RTN. 
035214 012746 MOV @PRIOG, -C SP) 
035220 012746 027310 MOV @RXCHRS, - CSP) 
035224 016746 144736 MOV RXVECA, -C SP) 
035230 012746 MOV #3, -CSP) 
035234 104437 TRAP CsSvEC 
035236 062706 000010 ADD #10,SP 
8542 035242 SETPRI @PRIO4S sALLOW INTERRUPTS. 
035242 012700 000200 MOV @PRIO4 ,RO 
035246 104441 TRAP CSSPRI 


035310 
035316 


035324 
035330 
035332 


035402 


012767 
012767 


004767 
103402 
000167 


004767 
004767 
012767 


000100 
177677 
010400 


144714 
147772 


147742 


144566 


147706 


144532 


¢ 

s TRANSMIT AND RECEIVE SHORT DATA PATTERN AT ALL BAUDRATES, 

; WITH 6 BITS PER CHARACTER, 1 STOP BIT, AND BOTH TYPES OF PARITY. 
s BOTH LINE GROUPS (LGPRS) TX AND RX WITH THE SAME PARAMETERS. 
‘- 


MOV @ERCNTB,RO 


JSR PC,CLR16W sCLEAR THE RX ERROR COUNTERS TABLE. 
MOV #10470,R1 sSET UP LPR CONTENTS FOR TX/RX AT 75 BAUD. 
4%: JSR PC ,GETTIM sGET TIME-OUT BASED ON MINIMUM BAUDRATE IN USE. 
MOV @SOP2B ,R2 sSET UP THE START ADR OF THE DATA PATTERN. 
MOV @SDP2E -SDOP2B,R3 ;SET UP THE DATA PATTERN LENGTH. 
MOV @1,R4 sSPECIFY TO SEND 1 DATA PATTERN TO EACH LINE. 
JSR PC, VANSUP sSET UP “VANILLA FLAVORED” TX/RX. 
MOV #177400, IBM sFORM BIT MAP OF UNUSED TX/RX BITS. 


MOV #9102. ,ERRNBR sSET THE ERROR REPORT NUMBER TO 9102. 


3° 
; THIS ROUTINE REPORTS ERRORS WITH NUMBERS »>>>>> 9102 THRU 9104 <<<«cc, 
S2 


= —s sPURGE THE DUT RECEIVE CHARACTER FIFO. 

.* 
JMP 508 sABORT THIS TEST IF FIFO WOULD NOT PURGE. 
JSR PC ,PURRXB sPURGE THE RX CHAR BUFFER IN MEMORY. 


JSR PC, INIOMA sSEND THE FIRST BATCH OF DATA PATTERNS. 
MOV #9105.,ERRNBR ;SET ERROR NUMBER TO 9105. 


3° 
s THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9105 THRU 9110 <<<<<, 


JSR PC .ROCHRS sREAD AND VERIFY THE RX CHARACTERS. 
TST FERROR sHAS AN ERROR BEEN DETECTED ? 
BEQ S$ ;NO, THEN BRANCH 
ay = ee HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
.° 
JMP 50% 3NO, THEN EXIT THE TEST. 
S$: MOV #9111. .ERRNBR sSET ERROR NUMBER TO 9111. 
3° 
: THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9111 THRU 9114 <<<<<, 
g° 
JSR PC, TXRREP sREPORT FINAL ERRORS FROM RX/RX. 
TST FERROR sHAS AN ERROR BEEN DETECTED ? 
BEQ 6% sNO, THEN BR ° 
BIT @B1TO6 OPTION sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
BEQ 50% sNO, THEN EXIT THE TEST. 


s¢ 

s TOGGLE THE PARITY TYPE BIT SPECIFIER IN THE TX/RX SETUP PARAMETERS. 
s SELECT THE NEXT BAUDRATE AND PERFORM THE TEST AGAIN IF NOT DONE. 

i- 


6%: MOV R1,RO sCOMPLEMENT THE PARITY TYPE 
BIC #100,R1 s BIT IN THE TX/RX LPR SETUP 
COM RO st PARAMETER LEAVING THE 
BIC #177677,R0 OTHER LPR PARAMETER 
BIS RO,R1 BITS UNCHANGED. 
ADD #10400 ,R1 }SELECT THE NEXT BAUDRATE. 
Bcc ae sLOOP TO TX/RX AGAIN IF NOT PAST LAST BAUDRATE. 


s¢ 
s PERFORM WIDE OPEN OMA TEST. 


C2 
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035512 


035514 


035570 


035576 
035602 


035606 


035612 
035616 


012705 


012767 


004767 
103126 
012767 


004767 
004767 


004767 


005767 
001407 


003602 


005072 


163102 
003602 
001000 
000001 
171140 
177400 
021633 


165236 
021636 


165424 
163100 


165450 
144406 


144456 
147534 


147520 


TRANSMIT AND RECEIVE 512 BYTE DATA PATTERNS AT ALL COMBINATIONS OF 9.6K, 
19.2K, AND 38.4K BUADRATES AND 5S AND 8 BITS PER CHARACTER. USE 1 STOP BIT 
AND NO PARITY GENERATION OR DETECTION. 


3° 

; INITIALIZE THE 512 BYTE PATTERN AND THE VARIOUS DATA PATTERN POINTERS. 

a ' 
CLR Ri ;CLEAR THE DATA BYTE COUNTER. | 


MOV @BUF BAS ,R2 sGET THE BASE OF THE DATA PATTERN BUFFER. 
7$: MOVB R1,(R2)>+ sWRITE A BYTE OF THE DATA PATTERN. 
INCB R1 sGET THE NEXT BYTE FOR THE DATA PATTERN. 
BNE 7$ sLOOP UNTIL FIRST 1/2 OF PATTERN IS DONE. 
8s: DECB Ri sGET THE NEXT BYTE FOR THE DATA PATTERN. 
MOVB R1,(R2)> sWRITE A BYTE OF THE DATA PATTERN. 
TSTB RI sCHECK FOR DONE WRITING DATA PATTERN. 
BNE 8s sLOOP IF DATA PATTERN IS NOT DONE. 
108: MOVB R1,(R2)-+ sWRITE A BYTE OF THE 32 BYTE OVERFLOW REGION. 
INC R1 sCOUNT THIS BYTE. 
CMP R1,032. sTEST FOR 32 BYTES WRITTEN. 
BNE 10$ sLOOP UNTIL 32 BYTES ARE WRITTEN. 
3¢ 
: PREPARE TO LOOP ON THE 3 DIFFERENT BAUDRATES (9.6K, 19.2K, AND 38.4K). 
3i- 
MOV @OLPRTB,RS sGET THE BASE ADR OF THE DMA BAUDRATE TABLE. 


3° 

; SPECIFY THE PROPER Senarteh 

; SPECIFY 8 BITS PER CHARACTE 

; PERFORM DMA TRANSMISSION AND’ RECEPTION OF 512 BYTE DATA PATTERN. 
t- 


3¢ 
s THE FOLLOWING ROUTINE REPORTS THE ERROR WITH NUMBERS 914 THRU 921. 
Q LPR CHANGE BIT ERROR FLAGS MAY BE SET BY THIS SUBROUTINE. 


} 
| 
| 
| 
| 
| 
ge 
12%: MOV CRS)+,R1 sSET UP LPR PARAM AT NEXT BAUD, 8 BITS/CHAR. | 
| 
| 
| 
| 


JSR PC,.GETTIM sGET TIME-OUT BASED ON MINIMUM BAUDRATE IN USE. 
MOV @BUF BAS ,R2 sSET UP THE START ADR OF THE DATA PATTERN. 

MOV #512. RS sSET UP THE DATA PATTERN LENGTH. 

MOV #1,R4 sSPECIFY TO SEND 1 DATA sgh gy TO EACH LINE. 
JSR PC, VANSUP sSET UP “VANILLA FLAVORED” 

MOV #177400, IBM sFORM BIT MAP OF UNUSED BITS xeon 8 BITS/CHAR. 


MOV @9115.,ERRNBR SET ERROR NUMBER TO 9115. 
3¢ 
s THIS ROUTINE REPORTS ERROS WITH NUMBERS >>>>> 9115 THRU 9117 <<<<<, 


JSR ost "tots sPURGE THE DUT RECEIVE CHARACTER FIFO. 
BCC sABORT THIS TEST IF FIFO WOULD NOT PURGE. 
MOV $9118. sERRNBR ;SET ERROR NUMBER TO 9116. 
JSR PC ,PURRXB sPURGE THE RX CHAR BUFFER IN MEMORY. 
JSR PC, INIOMA sSEND THE FIRST BATCH OF DATA PATTERNS. 
ae 
s THIS ROUTINE REPORTS THE ERROR WITH NUMBERS >>>>> 9118 THRU 9123 <<<<<, 
go 
JSR PC ,.ROCHRS sREAD AND VERIFY THE RX CHARACTERS. | 
TST FERROR sHAS AN ERROR BEEN DETECTED ? | 


BEQ 14% sNO, THEN BRANCH. 
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035620 
035626 


035630 


035704 


8662 035710 


035712 


035720 
035724 


035730 
035734 
035740 
035742 
035750 


035752 


035760 
035764 
035770 
035772 
036000 


036002 
036006 


036010 


032767 
001470 


012767 


004767 
005767 
001404 
032767 
001454 


012767 


012767 


004767 
103055 
Ci2767 


004767 
004767 


004767 
005767 
001404 
032767 
001417 


012767 


000100 


021644 


170476 
144356 


000100 


021650 


000030 
171010 
177740 


165114 
021654 


165302 
162756 


165326 
144264 


000100 


021662 


170354 
144234 


000100 


005100 


De 
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144334 


147460 


144304 


147430 


144326 


147376 


144212 


147336 


144162 


BIT #BIT06,OPTION sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
BEQ 50$ sNO, THEN EXIT THE TEST. 


MOV #9124. ,ERRNBR sSET ERROR NUMBER TO 9124. 


3¢ 
s THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9124 THRU 9127 <<<c<<, 
i- 


14$; JSR PC, TXRREP sREPORT FINAL ERRORS FROM RX/RX. 
TST FERROR sHAS AN ERROR BEEN DETECTED ? 
BEG 16% sNO, THEN BRANCH. 
BIT @BITO6,OPTION ;HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
BEQ 50% sNO, THEN EXIT THE TEST. 
16%: MOV #9128. ,ERRNBR sSET ERROR NUMBER TO 9128. 


2° 

; SPECIFY S BITS PER CHARACTER. 

; PERFORM OMA TRANSMISSION AND RECEPTION OF 512 BYTE DATA PATTERN. 
3 


BIC #30,R1 sSET UP CHAR LENGTH PARAM % i — 

JSR PC. VANSUP sSET UP “VANILLA FLAVORED” T 

MOV #177740, 18M sFORM BIT MAP OF UNUSED BITS FOR S BITS/CHAR. 
3¢ 
s THIS ROUTINE REPORTS THE ERROR WITH NUMBERS >>> 9126 THRU 9131 <<<. 
g° 

JSR PC,PUFIFR sPURGE THE DUT RECEIVE CHARACTER FIFO. 

Bcc 60$ sABORT THIS TEST IF FIFO WOULD NOT PURGE. 


MOV #9132..,ERRNBR ;SET THE ERROR REPORT NUMBER TO 9132. 


JSR PC,PURRXB sPURGE THE RX CHAR BUFFER IN MEMORY. 
JSR PC, INIDMA sSEND THE FIRST BATCH OF DATA PATTERNS. 


%¢ 
s THIS ROUTINE REPORTS THE ERROR WITH NUMBERS >>>>> 9132 THRU 9137 <<«<<<, 
g°¢ 

JSR PC ,ROCHRS sREAD AND VERIFY THE RX CHARACTERS. 


TST FERROR sHAS AN ERROR BEEN DETECTED ? 
BEQ 18% s3NO, THEN BRANCH. 
BIT @BITO6 , OPTION SHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
BEG 50% sNO, THEN EXIT THE TEST. 
18%; MOV #9138..ERRNBR ;SET ERROR NUMBER TO 9138. 
3° 
s THIS ROUTINE REPORTS THE ERROR WITH NUMBERS >>>>> 9138 THRU 9141 <<<<<. 
g° 
JSR PC, TXRREP sREPORT FINAL ERRORS FROM RX/RX. 
TST FERROR sHAS AN ERROR BEEN DETECTED ? 
BEQ 20% sNO, THEN BRANCH. 
BIT @BITO6 OPTION ;HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
BEQ 508 sNO, THEN EXIT THE TEST. 
208; CMP RS, @OLPRTE sCOMPARE DMA BAUDRATE TABLE PTR WITH TABLE END. 
BLO 126 sLOOP IF NOT ALL BAUDRATES DONE YET. 


3¢ 

s ALL DONE. WAVE EITHER RUN OUT OF ACTIVE LINES, OR COMPLETED THE TEST. 
3 OISABLE INTERRUPTS. 

5 CLEAR THE INTERRUPT VECTORS. 


ied 
SO0$; SETPRI @PRIO7 sOISABLE ALL INTERRUPTS. 
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8714 


8715 


8716 
8717 
8718 
8719 


8720 
8721 


036010 
036014 
036016 
036016 
036022 
036024 
036024 
036030 


012700 
104441 


016700 
104436 


016700 
104436 


012767 
004767 


012700 


104441 
005067 


104401 


000340 
144146 
144136 
sess 


000340 
144142 


147256 


608: 


CiRVEC TXVECA 


CLRVEC RXVECA 


MOV #9142. ,ERRNBR 


JSR PC,REPSMR 
SETPRI @PRIO7 


CLR CTRLCF 
ENOTST 


EQ 
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MOV 
TRAP 


sRETURN TX INT VECTOR TO UNUSED POOL. 
MO 


V 
TRAP 


sRETURN RX INT VECTOR TO UNUSED POOL. 
MO 


Vv 
TRAP 


sDISABLE ALL INTERRUPTS. 
MOV 


TRAP 
; INDICATE THAT WE ARE NOT WITHIN A TEST. 


L10033: 
TRAP 


SEQ 224 | 
#PRIO7,RO 
C$SPRI 


! 
| 
TXVECA,RO 
CsCvEC | 


RXVECA,RO 
CsCvEC 


sSELECT NUMBER 9142 FOR THE NEXT ERROR REPORT. 
sREPORT ERROR SUMMARIES IF CALLED FOR. 


@PRIO7 RO 
CsSPRI 


| 
CsETST 


F2 
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HARDWARE TEST - SPLSPD 
8723 .SBTTL HARDWARE TEST - SPLSPD - 
8724 Fo +RREAREAEASEASAREAEAEEEAEREREEEERAREEEERESEREEEEEASEAEEEEEEEEAEAEEEEEEEEAEEEERSE 
8725 3% - SPLIT SPEED TEST - 
8726 34 THIS TEST IS USED TO VERIFY THE SPLIT SPEED CAPABILITIES OF THE OHU11, 
8727 3% AND THE CORRECT OPERATION OF THE A & B BAUD RATE GROUP SELECTION. 
8728 34 THE TEST USES THREE SETS OF BAUD RATES (38.4,50; 1200.75; 2000,2400). 
8729 3% THIS TEST WILL ONLY EXECUTE IF THE STAGGARED LOOPBACK MODE IS SELECTED. 
pt ng 34 THE SPECIAL STAGGARED LOOPBACK BERG CONNECTOR MUST BE FITTED. 
1 3* 
8732 5 — “SP RAEREEEEAEAEHEEAEEAAEREEEEEEEEEEEEESEEAEEEREEEREDREEREEEERESLEEEEEEEEEDEEEDSE 
8733 036060 BGNTST 
036060 
8734 036060 126727 144110 000002 CMPB LOPBCK , #2 sCHECK MODE SELECTED. 
8735 036066 001402 . BEQ es 3:00 NOT EXIT IF STAGGERD LOPBCK MODE SELECTED. 
8736 036070 000167 000516 JMP 60$ sEXIT THIS TEST. 
8737 036074 2s: SETPRI 9#PRIOS sALLOW LTC INTERRUPTS. 
036074 012700 000240 . @PRIOS,RO 
036100 104441 CsSPRI 
8738 000010 TNUM == TNUM ¢ 1 sINCREMENT THE ASSEMBLY TIME Test COUNTER. 
8739 036102 012767 000010 144150 MOV @TNUM, TSTNUM iSET UP THE TEST NUMBER. (92) 
8740 036110 012767 177777 144102 MOV @-1,CTRLCF s INDICATE THAT WE ARE IN A TEST. 
8741 036116 012767 147170 MOV #1,ERRTYP sSET ERROR TYPE IN ERROR TABLE. 
8742 036124 012767 021761 147164 MOV #9201. ,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
8743 036132 012767 012605 147160 MOV @EM9201,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
8744 036140 005067 144334 CLR ERSMRF sINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS. 
ren 036144 005067 144054 CLR FERROR sCLEAR THE “AT LEAST ONE ERROR” FLAG. 
8747 ; "RESET THE DUT TO A KNOWN STATE, REMOVE STATUS CODES FROM THE FIFO. 
8748 ; CLEAR TX AND RX INTERRUPT ENABLE BITS. 
pda ; THIS SUBROUTINE REPORTS ERROR >>>>> 9201 <<<<<, 
3° 
8751 036150 004767 161254 JSR PC,CLNRST sRESET THE DUT. 
8752 036154 103402 6cs - +6 
thn 036156 000167 000430 JMP 60$ sABORT THE TEST IF FATAL ERROR FOUND IN RESET. 
3¢ 
8755 ; DISABLE ALL INTERRUPTS. 
ours ; SET UP DMA TX AND RX INTERRUPT SERVICE ROUTINES. 
g° 
8758 036162 SETPRI @PRIO7 sOISABLE ALL INTERRUPTS. 
036162 012700 000340 MOV @PRIO7,RO 
036166 104441 TRAP CsSPRI 
8759 036170 SETVEC TXVECA, @TXDMA, OPRIO6 sSELECT OMA TX INT SERVICE RTN. 
036170 012746 000300 MOV @PRIO6, -(SP) 
036174 012746 027520 MOV @TXDMA, -CSP) 
036200 016746 143764 MOV TXVECA, -CSP) 
036204 012746 000003 MOV @3,-CSP) 
036210 104437 TRAP CsSVEC 
036212 062706 000010 ADD #10,SP 
8760 036216 SETVEC RXVECA, ORXCHRS, OPRIOG sSELECT RX INT SERVICE RIN. 
036216 012746 300 MOV @PRIOG6, -( SP) 
036222 012746 027310 MOV @RXCHRS, -( SP) 
036226 016746 143734 MOV RXVECA, -C SP) 
036232 012746 000003 MOV @3,-CSP) 
036236 104437 TRAP CsSVEC 
036240 062706 000010 ADD #10,SP 
8761 036244 SETPRI @PRIO4 sALLOW INTERRUPTS. 
036244 012700 000200 MOV #PRIO4 ,RO 


Ge 
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HARDWARE TEST 
036250 104441 
8764 . 


036252 012705 177777 
036256 004767 167240 


8770 - 
036262 012700 003302 
036266 004767 161160 


8778 :- 

3 
8780 3 
6781 3 
8782 3 
012705 005100 


162322 
005154 


004767 
012767 


166454 


021762 146766 


004767 
103126 
012767 


164470 
021765 


164656 
162332 


146752 


164702 
143640 


000100 143566 


012767 021773 


004767 
005767 
001494 


167730 
143610 


146712 6%: 


TRAP C$SPRI 


3¢ 
; ENABLE TRANSMITTERS ON ALL LINES. 


MOV 
JSR 


@MAPLNS ,RS 
PC, TXENBL 


sPASS ACTIVE LINE BIT MAP, 
sENABLE TRANSMISSIONS ON ALL LINES. 


3¢ 
; CLEAR ERROR TABLE PRIOR TO PERFOMING TX/RX TEST. 
sGET THE BASE ADDRESS OF THE ERROR COUNTER TBL. 


MOV 
JSR 


#ERCNTB,RO 


PC,CLR16W ;CLEAR THE RX ERROR COUNTERS TABLE. 


i PERFORM _ SPEED DMA TX AND RX ON ALL SELECTED LINES AT THE FOLLOWING 
@ 
; 38.4K, SO ; 1200, 75 ; 2000, 2400. 


¢ 
INITIALISE DMA TX/RX PARAMETERS IN THE CONTROL BLOCK FR EACH OF THE BAUD 


RATES MENTIONED ABOVE. 
8 BITS/CHAR,1 STOP BITS,ODD PARITY. 

MOV PRB ,RS ;GET BASE ADDRESS OF LPR PARAMETER TABLE. 
MOV CRS5S)+,RO 3;GET LPR CONTENTS FOR LINGRP II. 
MOV CR5S)+,R1 ;GET LPR CONTENTS FOR LINGRP I. 
JSR FC,GETTIM :GET TIME-OUT BASED ON MINIMUM BAUDRATE IN USE. 
MOV @SDP2B ,R2 ;SET UP THE START ADR OF THE DATA PATTERN. 
MOV CRS)+,R3 ;GET NUMBER OF REPEAT TRANSMISSION ON LINGRPII. 
MOV CR5)+,R4 ;GET NUMBER OF REPEAT TRANSMISSION ON LINGRPI. 
JSR PC, SPLSUP ;SET UP CONTROL BLOCK ETC, FOR aa 
MOV #9202. ,ERRNSR ;SET THE ERROR NUMBER TO 9202. 

s¢ 

; THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9202 THRU 9204 <<«<<<, 

a i 
JSR PC ,PUFIFR sPURGE THE DUT RECEIVE CHARACTER FIFO. 
BCC 60% sABORT THIS il IF FIFO WOULD NOT PURGE 
MOV #9205. ,ERRNBR sSET ERROR NUMBER TO 9205. 
JSR PC ,PURRXB sPURGE THE RX CHAR BUFFER IN MEMORY. 


JSR PC, INIDMA sSEND THE FIRST BATCH OF DATA PATTERNS. 
3° 
s THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9205 THRU 9210 <<<<<, 


JSR PC ,ROCHRS sREAD AND VERIFY THE RX CHARACTERS. 

TST FERROR sHAS AN ERROR BEEN DETECTED ? 
BEQ 6% 3NO, THEN BRANCH 

BIT @BITO6,OPTION HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
BEQ 50¢$ sNO, THEN EXIT THE TEST. 

MOV #9211.,ERRNBR ;SET THE ERROR NUMBER TO 9211. 


3¢ 
s THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9211 THRU 9214 <<<<<, 
ge 


JSR PC , TXRREP sREPORT FINAL ERRORS FROM RX/RX. 
TST FERROR sHAS AN ERROR BEEN DETECTED ? 
BEQ 8% sNO, THEN BRANCH. 


SEQ 226 


HARDWARE TEST 


036416 
036424 


036426 


032767 
001457 


012767 


010246 


004767 
103052 


000100 


021777 


166316 


164340 
022002 


164526 
162202 


164552 
143510 
000100 


022010 


167600 
143460 
000100 


005130 


000340 


143372 


He 
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> SPL 


@PRIO7,RO 
CsSPRI 


TXVECA,RO 


143536 BIT #BITO6,OPTION sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
BEQ 50$ s;NO, THEN EXIT THE TEST. 
146662 83: MOV #9215. ,ERRNBR ;SET ERROR NUMBER TO 9215. 
3¢ 
; SWAP PARAMETERS TO ALLOW FOR BOTH CHANNELS TO BE EXERCISED. 
- 
MOV Re, -(SP) ;PUSH THE START ADDRESS ONTO THE STACK. 
MOV RO,R2 3 
MOV R1,RO 3 
MOV R2,R1 ;SWAP THE TWO SETS OF 
MOV R3,R2 ; PARAMETERS OVER. 
MOV R4,R3 3 
MOV R2,R4 3 
MOV (SP)+,R2 sRESTORE THE START ADDRESS. 
JSR PC,SPLSUP ;SET UP CONTROL BLOCK ETC, FOR TX/RX. 
3¢ 
; THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9215 THRU 9217 <<<<<, 
ge 
JSR PC,PUFIFR sPURGE THE DUT RECEIVE CHARACTER FIFO. 
BCC 60$ sABORT THIS TEST IF FIFO WOULD NOT PURGE. 
146622 MOV #9218. ,ERRNBR sSET ERROR NUMBER TO 9218. 
JSR PC ,PURRXB sPURGE THE RX CHAR BUFFER IN MEMORY. 
JSR PC, INIDMA sSEND THE FIRST BATCH OF DATA PATTERNS. 
3¢ 
; THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9218 THRU 9223 <<c«c<, 
Tad 
JSR PC,ROCHRS cook ANDO VERIFY THE RX CHARACTERS. 
TST FERROR sHAS AN ERROR BEEN DETECTED ? 
BEQ 10% 3NO, THEN BRANCH 
143436 BIT @6BIT06,OPTION sHAS EXTENDED ERROR i a BEEN REQUESTED ? 
BEQ 50% 3NO, THEN EXIT THE TEST 
146562 108: MOV #9224. ,ERRNBR sSET ERROR NUMBER TO 9224. 
3¢ 
3s THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9224 THRU 9227 <<<<<, 
ge 
JSR PC, TXRREP sREPORT FINAL ERRORS FROM RX/RX. 
TST FERROR sHAS AN ERROR BEEN DETECTED 7? 
BEQ 12% 3NO, THEN BRANCH. 
143406 BIT @BITO6 ,OPTION SHAS EXTENDED ERROR ~ aaa BEEN REQUESTED ? 
BEQ 50% 3NG, THEN EXIT THE TEST 
12%: CMP RS, @SPLPRE sCHECK IF ALL PARAMETERS HAVE BEEN DONE. 
BLO ay 3IF NOT DONE LOOP TO SELECT THE NEXT PARAMETER. 
3¢ 
3 DISABLE INTERRUPTS. 
3 CLEAR THE INTERRUPT VECTORS. 
ge 
50$: SETPRI @PRIO7T sDOISABLE ALL INTERRUPTS. es 
TRAP 
CLRVEC TXVECA sRETURN TX INT VECTOR TO UNUSED — 
Vv 
TRAP 


CsCveEc 


SEQ 227 
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HARDWARE TEST 


8871 

8872 036600 

8873 036606 

8874 036612 

8875 036616 
036616 
036616 


012767 
004767 
005067 


104401 


Le 


ATION MACRO M1200 12-DEC-83 16:16 PAGE 136-3 SEQ 228 
- SPLSPD - 
022014 146510 MOV #9228. ,ERRNBR ;SELECT NUMBER 9228 FOR THE NEXT ERROR REPORT. 
165310 JSR PC,REPSMR sREPORT ERROR SUMMARIES IF CALLED FOR. 
143402 60$: caret CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. | 
2 
L10034; | 


TRAP CsETST 


Je 
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8877 


000011 
012767 
012767 
016702 
012703 
020203 
001411 


012701 
104455 
022125 
012635 
015720 
012767 


005067 


104401 


000011 
177777 
143650 
002512 


013011 


002512 
143322 


143432 
143364 


143616 


.SBTTL HARDWARE TEST 


Lot RHRREHAEARARAREREAAERAEEEAEREEAEAEASEERAEEREEEEEAERASCEREEEEREEEAAAEEEEAEEEESD 


7) - REPORT ANY BMP CODES IN THE QUEUE - 

;* THIS IS A PSEUDO-TEST USED TO REPORT ANY BMP CODES THAT WERE FOUND 

i* gy DUT'S FIFO OURING PREVIOUS TEST, AND LOGGED IN THE BMP CODE 

i* . 

if IT IS UNLIKELY THAT RUNNING THIS PSEUDO-TEST ALONE WILL PRODUCE ANY 

34 ERROR REPORTS. 

* 

han PERORESAREEEEREEEEEEEREREEEEEEEREEEAEEEOREREEEEEAEEEEEEREEEEEREEEEEEEEEERES 
BGNTST 


TNUM == TNUM + 1 
MOV @TNUM, TSTNUM 
MOV #-1,CTRLCF 
MOV BMPCOP ,R2 
MOV @BMPCGQB ,.R3 
CMP R2,R3 

BEQ 60$ 


3¢ 
; THERE IS AT LEAST ONE BMP CODE IN THE QUEUE. REPORT THE ERROR. 
sREPORT ERROR BMP CODE FOUND IN TEST NN, BMP CODE : NNNNNN” 


MOV 9EM9304 ,R1 


ERROF  9301,€M9301,ER9301 ; 


MOV ®BMPCAB ,. BMPCQP 


60%: CLR CTRLCF 
ENOTST 


- REPBMP - 


T9: 

s INCREMENT THE pet TIME TEST _ 
sSET UP THE TEST NUMBER (93) 

S INDICATE THAT WE ARE IN A TEST. 
sGET THE CONTENTS OF THE POINTER. 
sGET THE START ADDRESS OF THE QUEUE. 
3SEE IF THE POINTER HAS MOVED FROM THE BASE. 
sEXIT NO CODES IN THE QUEUE. 


;PASS THE FIRST MESSAGE TO BE REORTED. 
>>>>> ERROR @9301 <<<<<, 
TRAP CSERDF 


-WORD EM9301 
-WORD ER9301 


sSET POINTER BACK TO THE BEGINING OF THE QUE. 
s INDICATE THAT WE ARE NOT WITHIN A TEST. 


L10035: 
TRAP CsETST 


SEQ 229 


a 


Ke 
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8909 
8910 
8911 


000027 


000031 
036760 


160000 
177776 


001031 
036776 
000040 
000776 


002032 
037031 
177777 


000000 
177777 


j BSSCSSCLIGCSGAGM RA “GORGE GLAASGSSSGAKGIGGMGGS THK GMA CHK SSHSMSSGKCSAGKGLKSS SEALS SSSHSSASS SESS 


a 
3 FVTC.HWQ 


SEQ 230 


; 
; BHLGLHSLSACESSSASAGSGLGCSGVSSHS GGL GSSSCMGATHLSL SSSA UASAIALSSGSSKSSSASASTALGEBAEASSSASSS 


-SBTTL HARDWARE PARAMETER CODING SECTION 


see 


INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. 
WITH THE OPERATOR. 


BGNHRD 


sDEVICE CSR ADDRESS QUESTION: 
GPRMA HWPTQ1,0,0,160000,177776, YES 


sDEVICE INTERRUPT VECTOR QUESTION: 
GPRMA 8 HWPTQ2,2,0,40,776, YES 


sACTIVE LINES BIT MAP QUESTION: 
GPRMD = HWPTQ3,4,0,MAPLNS,O,MAPLNS, YES 


sTYPE OF LOOPBACK QUESTION: 
GPRMD = HWPTQ4,6,0,377,1.5, YES 


sINTERRUPT BR LEVEL QUESTION: 
GPRMD HWPTQS,.6,0,177400,0,6, YES 


THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. 


THE 


THE 


MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 


S553 G5555 $5555 5558 5883 


T$LOLIM 
TSHILIM 


TS$CODE 
HWPTQ3 
MAPLNS 
TSLOLIM 
TSHILIM 


TSCODE 
HWP TQ4 
377 
TSLOLIM 
TSHILIM 


TSLOLIM 
TSHILIM 


Le 
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HARDWARE PARAMETER CODING SECTION 


8951 
8952 
8953 


8963 


8964 


8965 


8966 


036760 
036760 


037177 


ENDHRD 


HWPTQ1: 


HWPTQe: 


HWPTQ3: 


HWPTQ4: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCII 


-ASCIZ 


-EVEN 
L10036: 


/CSR ADDRESS: / 


ZINTERRUPT VECTOR ADDRESS: / 


/ACTIVE LINE BIT MAP: / 


/TYPE OF LOOPBACK (1=*INTERNAL, 2*H3277, 3=H325/<15><12> 


/ 4=MODEM, S=KEYBOARD ECHO): / 


SEG 231 
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HARDWARE PARAMETER CODING SECTION 
037202 101 122 104 
037205 040 105 103 
037210 110 117 051 
037213 072 040 000 

8967 037216 111 116 124 
037221 105 122 122 
037224 125 120 124 
037227 040 102 122 
037232 040 114 105 
037235 126 105 114 
037240 072 040 000 

8968 

8969 


HWPTQS: 


- EVEN 


Me 


-ASCIZ /INTERRUPT BR LEVEL: / 


Ne 
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HARDWARE PARAMETER CODING SECTION 


8972 


8973 
8974 
8975 
8976 


037244 
037244 
037246 


037270 
037270 


037272 
037272 
037274 
037276 
037300 
037302 


037304 
037304 


000017 


; SHSCASSSASSSSSSSSSSSSASSST AAAS KS SSSSSSSSSSAAAS SAS SASS S SSSA SSAA SSA SSSA SAAS 


; FVTA.SWQ 
o 
j SSSSSSAASSSSS SSS SAATA SSSA S SSSA TASSSSSS SSCS SASS AAS SS SSSA SSSA SKS SSSASS SSS 


-SBTTL SOFTWARE PARAMETER CODING SECTION 


; 
; THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 

; THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
; MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
; MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
; WITH THE OPERATOR. 

i 


BGNSF T 
-WORD L1003; _sSOFT/2 
L$SOFT:: 
;UNIT NUMBER PRINTOUT QUESTION: 
GPRML SWPTQ1,0,20, YES 
-WORD TSCODE 
-WORD SWPTQ1 
-WORD 20 
sREPORT NUMB OF BITS TESTED IN DMA ADDR TEST QUESTION: 
GPRML SWPTQ@2,0,40,YES 
-WORD TSCODE 
-WORD  SWPTQ2 
-WORD 40 
sEXTENDED ERROR REPORTING QUESTION: 
GPRML SWPTQ3.0,100, YES 
-WORD TSCODE 
-WORD SWPTQ3 
-WORD 100 
3° 
; IF EXTENDED ERROR REPORTING IS NOT REQUIRED THEN SKIP THE NEXT QUESTION. 
3* 
XFERF ENDD 
-WORD TSCODE 
sNUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE QUESTION: 
GPRMD  SWPTQ4,2,0,177777,0,177777, YES 
-WORD TSCODE 
-WORD SWPTQ4 
-WORD 177777 
«WORD TSLOLIM 
-WORD TSHILIM 


EVEN 
ENOD: ENOSFT 
L10037;: 


Sur TWAMt PARAMETER CODING SECTION — 


2025 


926 


9027 


9028 


037304 


037550 
037553 


moreTra 


to 


ecve 


SWPTQL: 


SWPTQ2: 


SWPTQS: 


SWPTQ4: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


Shu 234 


7REPORT UNIT NUMBER AS EACH UNIT IS TESTED: / 


/REPORT NUMBER OF BITS TESTED IN DMA ADOR TEST: / 


ZEXTENDED ERROR REPORTING: 


/ 


/NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE: / 


eS 
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037556 105 072 040 
037561 000 


9029 
9030 


8, 


12-DEC-83 16:16 PAGE 139-2 


EVEN 


SEQ 235 


EN 


D4 


DHU-11 FUNCTIONAL VERIFICATION MACRO M1200 12-DEC-83 16:16 PAGE 140 SEQ 236 


SOFTWARE PARAMETER CODING SECTION 


037562 
037562 


037632 


037632 
037634 
037636 
037636 


; BEGGLGMGHLAGHSSGSGMSSHSASTSSGKSSSSCISTSMLASAGGKAGSSITGSS GLASS CSAGKKLCALASSAGOOAAGRHRSOD 


; 
H FVTSKL6.P11 


; i 
; SEPSGCLSASSIG6ASCSKGGSKLE AKCKAVHGSS SHAGGCSASSCSSGHS SSS SESSASTCSUSESSSHSSESEDSILADEOHS | 


$PATCH:; 3 
-BLKW 24 
LASTAD 
-EVEN 
«WORD O 
-WORD O 


LSLAST:: 
E 


- ENO 


SS EE RS 


cs 
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SEQ 237 

SYMBOL TABLE 
ACTLNS 002172 G CHCNTB 003442 G CSOPEN= 000034 EF9012 007001 G EM9401 013065 G 
ADDR 025312 CHKEXT 016410 G CSPNTB= 000014 EF9013 007115 G ENOO 037304 

° G CHKLOS 016510 G CSPNTF= 000017 EF9019 007162 G ENDETB 004602 G 
ADRPTR 017362 G CHRTOT 002476 G CSPNTS= 000016 EF9020 007201 G ENOIT 030476 
ALTFLD 016112 G CKCHR 016612 G CSPNTX= 000015 EF9101 007262 G ERCNTB 003302 G 
ASSEMB= 000010 CKFRPR 0170350 G CsQIO = 000377 EF9103 007265 G ERLTBL 003602 G 
BCOUNT 002306 G CKINAC 017242 G C&$RDBUs 000007 EF9301 007333 G ERRBLK 005322 G 
BORMSG 013137 G CKTRAP 017350 G CS$REFG= 000047 EF9302 007401 G ERRMSG 005320 G 
BITSTD 033766 CKTRPB 017400 G CSRESE* 000033 EMLMSG 013166 G ERRNBR 005316 G 
BITTBL 002364 G CLKBRL 002272 G CsREVI= 000003 EMO101 022162 G ERRTYP 005314 G 
BITO = 000001 G CLKCSR 002270 G CS8RFLA= 000021 EMO102 022246 G ERSMRF 00. G 
BITOO = 000001 G CLKHRZ 002276 G CsRPT = 000025 EMO103 010041 G ERO101 013572 G 
BITO1 = 000002 G CLKINT 027240 G CSSEFG= 000046 EMOSO9 010077 G EROSOS 014124 G 
BITO2 = 000004 G CLKVEC 002274 G C$SPRI= 000041 EM1601 010103 G ER1603 014162 G 
BITO3 = 000010 G CLNRST 017430 G CSSVEC= 000037 EM4401 010166 G ER6201 014254 G 
BITO4 = 000020 G CLRI6W 017452 G CsTPRI= 000013 EM4402 010216 G ER9001 014512 G 
BITOS = 000040 G C 017474 G DELAY 017550 G EM4403 010264 G ER9002 014612 G 
BITO6 = 000100 G CSRA 002200 G OFPTBL 002150 G EM4404 010361 G ER9003 014770 G 
BITO7 = G CSRO_ = DIAGMC = EM4405 010420 G ER9004 015162 G 
BITOS = 000400 G CTRLCF 002220 G OLPRTB 005072 G EM4406 010514 G R9005 015276 G 
BITO9 = 001000 G CsAU = 000052 OLPRTE 005100 G EM4407 010570 G ER9101 015536 G 
BITi = G CSAUTO= 000061 017662 G EM4408 010652 G ER9102 015576 G 
BIT10 = 002000 G CsBRK = 000022 OMTSTA 002222 G EM4409 010715 G ER93S01 015720 G 
BIT11 = 004000 G C$BSEG= 000004 OM168 017610 G EM4410 010752 G EV. - G 
BIT12 = 010000 G C#BSUB= 000002 020004 G EM4411 011001 G EXCNTB 003242 G 
BIT13 = 020000 G CSCEFG= 000045 OPENDB 003142 G EMS303 011046 G EXTMSG 013235 G 
BIT14 = 040000 G CS8CLCK= 000062 OPLENB 003202 G EM6201 011117 G ESEND = 002100 
BIT1S = 100000 G CSCLEA= 000012 DPRSQ@B 004642 G EM6202 011151 G ESLOAD= 000035 
BIT2 = 000004 G CsCLOS= 000035 OPRSQE 005042 G EM6301 011160 G FDATA 002206 G 
BITS = 000010 G CsCLPi= DRADRT 002200 G EM6901 011211 G FDATO = G 
BIT4 = 000020 G CS8CVEC= 000036 OROP 30552 EM9003 011236 G FERROR 002224 G 
BITS = 000040 G CSOCLN= 000044 OUMY 033770 EmM9004 011 G FFREM 002226 G 
BIT6 = 000100 G Cs000U" 000051 EDPFMT 007735 G EM9006 011276 G FINACT 020074 G 
BIT7 = 000200 G CSORPT= 000024 EDROP 030630 EM9007 011351 G FRPSUP 020154 G 
BITS = 000400 G Cs0U_ = 000053 EF .CON= 000036 G EM9006 011434 G FSLSA 002206 G 
BIT9 = 001000 G CSEDIT= 000003 EF .NEW= O00035 G EmM9009 011515 G FSLSO = 000006 G 
BMPCQB 002512 G CSEROF= 000055 EF .PWR= 000034 G EM9010 011541 G FSAU_ = 000015 
BMPCQE 002712 G CSERHR= 000056 EF .RES= 000037 G EM9011 011565 G FSAUTO= 000020 
BMPCQ@P 002510 G CSERRO= 000060 EF .STA= 000040 EmM9012 011575 G FSBGN = 000040 
BOE = 000400 G CSERSF= 000054 EFOSOS 0054535 G EmM9013 011605 G FSCLEA= 000007 
BRLEVL 002175 G CS#ERSO= 000057 EF1601 005460 G EM9014 011614 G FsDU = 000016 
BRIBLB 002424 G CSESCA= 000010 EF1603 005512 G EmM9015 011710 G FSEND = 000041 
BRIBLE 002464 G CSESEG= 000005 EF4401 005554 G EM9016 011724 G FSHARD= 000004 
BUFBAS 003602 G $ESUB= 000003 EF6201 005671 G EmM9017 0117353 G FsHw = 000015 
BUF END G CSETST= 000001 6202 006004 G E 012044 G FSINIT= 000006 
BUFMID 004202 G CSEXIT= 000032 EF6203 006102 G EM9026 012140 G FSJMP = 000050 
BUF 3QT G CS&GETB= 000026 EF7601 006177 G EM9027 012164 G FSMOD = 000000 
CALMSL 016164 G C8GETW= 000027 EF9001 006235 G EmM90268 012244 G FSMSG = 000011 
CBB 003122 G CS$GMAN= 0000435 EF9002 006317 G EM9030 012323 G FSPROT= 000021 
CBDPAA 003126 G C8GPHR= 000042 EF9003 006371 G EM9101 012400 G FSPWR = 000017 
CBOPLA 0031350 G C&GPLO= 000030 EF9004 006420 G EmM9102 012442 G FSRPT = 000012 
CBOPNA 003132 G C&#GPRI= 000040 EF9005 006450 G EmM9104 012531 G FSSEG = 000005 
CBLNCA 003124 G CsINIT= 000011 EF9006 006501 G Em9201 01 FSSOFT= 000005 
CBLPBA 003136 G C#INLP= 000020 EF9007 006520 G EM9301 012655 G FSSRV = 000010 
CBLPRA 003122 G CSMANI= 000050 EF9008 006614 G EmM9302 012714 G FSSUB = 000002 
CBMAPA 003134 G C8MEM = 000031 EF9009 0066535 G EM9303 012744 G Fe¢SW = 000014 
CBOFSA 003140 G C#MSG = 000023 EF9010 006712 G EM9304 013011 G FSTEST= 000001 


Se eee 


cr cS esse 


PS 
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L 

020420 G IsTST = 000041 LSRPT 027652 G MSTICK 002310 G PRIO7 * 000340 G 
020546 G J$JMP = 000167 L$SOFT 037246 G MUL16U 021532 G PROTBL 005214 G 
030270 LGRP1M 002236 G L$SPC 002056 G NOERPT 002164 G PRPARE 022450 G 
020630 G LGRP2M 002240 G L$SPCP 002020 G NOPMSG 013316 G PRTILPR 022660 G 
002230 G LINBIT 021000 G L$SPTP 002024 G NEWCHR 021606 G PUFIFO 022742 G 
002464 G LNCTRA 002210 G L$STA 002030 G NEWPAS 030250 PUFIFR 023024 G 
LNCTRO= 000010 G L$Sw 002162 G NEWRES 030242 PURRXB 023226 G 
000372 LOE = 040000 G LS$TEST 002114 G NEWSTA 027732 RBUFA 002202 G 
000003 LOPBCK 002174 G L$TIM 002014 G NUMLNS= 000020 G RBUFO = 000002 G 
000400 LOT = 000010 G LS$UNIT 002012 G ODTSTA 033772 ROCHRS 0, G 
LPCSLT= 000036 G L10000 002160 ooP 022116 G ROMAST 023722 G 
000001 LPRA 002204 G L10001 002166 OPTION 002162 G REPCOD 023762 G 
000000 LPRO = G L10002 013706 OSAPTS= 000000 REPSMR 024122 G 
000400 LSACP 002110 G L10003 014160 OsAU = 000000 RESETT 024150 G 
000376 LSAPT 002036 G L10004 014252 OSBGNR= 000001 RRXNON 024262 G 
000001 L$AU 030636 G L10005 014510 O$BGNS= 000001 RTXMON 024330 G 
LSAUT 002070 G L10006 014610 Os0U = 000001 RXBCNT 002716 G 
L$AUTO 030506 G L10007 014766 OSERRT= 000001 RXBOTX= 000030 G 
000140 LsCCP 002106 G L10010 015160 OSGNSW= 000001 RXBEND 003120 G 
LSCLEA 030510 G 110011 015274 OSPOIN= 000001 RXBETX= G 
000040 isco 002032 G L10012 015534 OsSSETU= RXBFUL= 000100 G 
000120 L$DEPO 002011 G £10013 015574 PARATB 002324 G RXBIPT 002714 G 
000020 LSDESC 005374 G L10014 015716 PARATE 002344 G RXBOPT 002712 G 
000004 LSDESP 002076 G L10015 016110 PAROA 002324 G RXBSTA 002720 G 
000010 L$DEvP G L10016 027656 PARIA 002326 G RXCHRS 027310 G 
LSDISP 002124 G L10020 030504 PAR2A 002330 G RXCNTB 003542 G 
100000 G L$OLY 002116 G L10021 030506 PAR3SA 002332 G RXDONF G 
036760 LsOTP 0G L10022 050524 PAR4A 0023534 G RXDSBL 024376 G 
036776 LSOTYP 002034 G L10023 030634 PARSA 002336 G RXENBL 024472 G 
037031 L$DU G L10024 030642 PAR6A G RXIEO 024566 G 
037057 LSOUT 002072 G L10025 031124 PARTA 002342 G RXIE1 G 
037216 LSOVTY 005364 G L10026 031366 PASCNT 002242 G RXPTRB 003402 G 
010000 G LSEF 002052 G L10027 PCSLOT= 000016 G RXTIMO= 000002 G 
002232 G LSENVI 002044 G Li0030 033776 PORATB 002344 G RXTMA 002202 G 
0G LSERRT 005314 G L10031 034412 PDRATE 002364 G RXTOUT 002246 G 
020000 G LSETP 002102 G L10032 035070 POROA 002344 G RXVECA 002166 G 
002234 G LSEXP1 002046 G L10033 PORIA 002346 G ROSLOT= 000002 G 
020706 G LSEXP4 002064 G L10034 036616 POR2A 002350 G RiSLOT= 000004 G 
000100 G LSEXPS 002066 G L10035 036676 PORSA 002352 G R2SLOT= 000006 G 
004000 G LSHARD 036702 G L10036 036760 POR4A 002554 G R3SLOT= 000010 G 
000041 LSHIME G L10037 037304 PORSA 002356 G R4SLOT= 000012 G 
000041 LSHPCP 002016 G MAPLNS= 177777 G POR6A 002 G RSSLOT= 000014 G 
000041 LSHPTP G MFUNIT 005422 G PORTA 002362 G Ss. 024652 G 
000041 L SH 002150 G MME 002322 G PMSFLG 002244 G SAVPRI 002250 G 
000041 LSICP 002104 G MMPRES 0023520 G 013444 G SAVTEN 002252 G 
000041 LSINIT 027666 G 002314 G PNT = 001000 G 005042 G 
000041 LSLADP G MMSRS 002316 G PREGRT 005346 G SCBCTE 005052 G 
000041 LSLAST 037636 G MODSUP 021026 G PREGOS 005324 SCBRTB 005052 G 
000040 LSLOAD 002100 G MSFMT1 007577 G PRFRME 022344 G 005060 G 
000041 LSLUN 002074 G MSFMT2 007637 G PRI =» 002000 G SCNSTB 005060 G 
000041 LSMREV G MSG1 013710 G PRIOO = 000000 G SCNSTE 005064 G 
000041 LSNAME 002000 G 013766 G PRIO1 = 000040 G SCTPTB 005064 G 
000041 LSPRIO 2G MSGS 014045 G PRIO2 = 000100 G SCTPTE 005072 G 
000041 LSPROT 027660 G MSLCNT 002312 G PRIOS = 000140 G SDOPBAS 005150 G 
000041 LSPRT 002112 G MSLGET 021166 G PRIO4 = 000200 G SDPEND 005150 G 
000041 LSREPP 00 G MSLOOP 0213502 G PRIOS = 000240 G sOP2B 005154 G 
000041 LéREV 002010 G MSSRPT 021316 G PRIO6 = 300 G SOP2E 005174 G 


ee eee 


- ABS. 


FUNCTIONAL VERIFICATION 


TABLE 


037636 


AvHHHHG 


000000 
ERRORS DETECTED: 
VIRTUAL MEMORY USED: 


DYNAMIC MEMORY : 


000 


ELAPSED TIME: 00:03:59 


od 


TP4FLG 
TP4RTN 


TXIE1 
TXINTF 


20060 WORDS ( 


MACRO M1200 12-DEC-83 


~~ 
ANHOHHAHAHOHOAHAHHAHHGAOHHHHHHOOOA 


30240 WORDS ( 119 PAGES) 
77 PAGES) 


PARTC.BIN,PARTC .LST/-SP=SVC34R/ML ,PARTC.P11 


TXPTRB 003342 
TXRINI 025776 
TXROFF 026252 
TXRON 026312 
TXRREP 026340 
TXRXLB 005234 
TXRXLE 005274 


TSLAST= 1 
TSLOLI= 

TSLSYM= 010000 
TSLTNO= 11 


TSPTNU= 


ipialeialaiai2is) 


G35 


16:16 PAGE 140-3 


TSSAVL®= 
T$SEGL*= 
T$SUBN= 
TSTAGL= 
T$TAGN= 
TSTEMP= 


177777 
177777 
000000 


TSTEST* 000011 


TSTSTM= 
TSTSTS= 
TS$AU = 
TS$$AUT= 
TSSCLE= 
T$$0U = 
T$$HAR= 
TS$HwW = 
TS$INI= 
T$$MSGe 
T$$PRO= 
T$$RPT= 
T$$SOF = 
T$$Sw = 
TS$TES= 
T1 


T2 031126 
T3 031370 
14 032322 
TS 034000 
T6 034414 
17 035072 
T8 036060 
T9 036620 
VAM  =#* 000200 
UBRFMT 007501 
UNITN 002176 
UNSDIV 026454 
026610 

VANSUP 026706 
WAIBIS 027104 
1 002266 
WIWLNC 027160 
WTWLPR 027210 


X$TRUE= 20 
$PATCH 037562 


DOAAHHAHHHHAHAHHHHHHHAH 


SEQ 239 


